【至急】エクセル2016について質問です。セルA1からA100のデータを、1つのセルにカンマを付けまとめるにはどうしたら良いでしょうか?
【至急】エクセル2016について質問です。セルA1からA100のデータを、1つのセルにカンマを付けまとめるにはどうしたら良いでしょうか?
Excel | Visual Basic・21閲覧・100
ベストアンサー
方法① B1: =A1&","&B2 B99 迄コピペ。 B100 =A100 方法② B1: =TextJoin(",",TRUE,A1:A100) ユーザー定義関数でTextJoinを使えるようにする。 ' Function TextJoin _ (Delimiter As String, Ignore As Boolean, TextArea As Range) As String Dim Cell As Variant ' For Each Cell In TextArea ' If Not Ignore Or Cell > "" Then TextJoin = TextJoin & Delimiter End If TextJoin = TextJoin & Cell Next Cell Cell = Len(Delimiter) + 1 TextJoin = Mid(TextJoin, Cell) End Function 方法③力技 B1: =A1&","&A2&","&A3&","&A4&","&A5&","&A6&","&A7&","&A8&","&A9&","&A10&","&A11&","&A12&","&A13&","&A14&","&A15&","&A16&","&A17&","&A18&","&A19&","&A20&","&A21&","&A22&","&A23&","&A24&","&A25&","&A26&","&A27&","&A28&","&A29&","&A30&","&A31&","&A32&","&A33&","&A34&","&A35&","&A36&","&A37&","&A38&","&A39&","&A40&","&A41&","&A42&","&A43&","&A44&","&A45&","&A46&","&A47&","&A48&","&A49&","&A50&","&A51&","&A52&","&A53&","&A54&","&A55&","&A56&","&A57&","&A58&","&A59&","&A60&","&A61&","&A62&","&A63&","&A64&","&A65&","&A66&","&A67&","&A68&","&A69&","&A70&","&A71&","&A72&","&A73&","&A74&","&A75&","&A76&","&A77&","&A78&","&A79&","&A80&","&A81&","&A82&","&A83&","&A84&","&A85&","&A86&","&A87&","&A88&","&A89&","&A90&","&A91&","&A92&","&A93&","&A94&","&A95&","&A96&","&A97&","&A98&","&A99&","&A100
質問者からのお礼コメント
関数はまるっきりダメなので、方法①でやることにしました!!
お礼日時:1/24 11:42