- ベストアンサー
エクセルの関数、VBA？ に関する質問です
- みんなの回答 （2）
- 専門家の回答
関連するQ&A
- エクセルの関数、VBA？ に関する質問です
エクセルの関数、VBA？ に関する質問です 添付画像を大きく変更しました。 添付画像のように、 複数のセルの内容（C列）を一つのセルに改行して 入力する場合（M列）はどのような関数にすればよいのでしょうか。 そもそも関数では実現できないのでしょうか 現状はいったんテキストエディタにコピペした後に 再度それを一つのセルにペーストしています。 何か良い方法があれば、教えて頂けると助かります。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 【VBA】コピー＆複数個所のペースト繰り返し
前回と同じ質問ですが、説明が足りなかったので画像を添付いたしました。 添付画像のように、1つの値をコピーし、別シートの複数個所（同じ列の違う行）へ順次ペーストしたいのですが、貼付けデータやペーストする回数が増えた場合でも対応できるようなVBAを教えてください。 コピペする条件としては、MsgBox関数を使い「コピーするか？」で「はい」を選択すると、任意のセルにデータがコピペされます。 よろしくおねがいいたします。
- ベストアンサー
- Excel（エクセル）
- エクセルのマクロ（VBA）の事で質問です。
エクセルのマクロ（VBA）の事で質問です。 Ａ列のA１からA100ぐらいまで、各セルに以下のような文章があるとします。 -------------------------------------------- Ａ１ 今日は、天気です。 明日も良い天気になるといいですね。 -------------------------------------------- Ａ2 今日は野菜が安いです。 昨日よりも安くて主婦には助かります。 味も美味しいです。 -------------------------------------------- ・ ・ ・ このような感じでセルの中に色々と文章が入っています。 これをマクロ（VBA）を使いＢ列には以下のようにしたいです。 -------------------------------------------- Ｂ１ 今日は、天気です。<br /> <br /> 明日も良い天気になるといいですね。 -------------------------------------------- Ｂ2 今日は野菜が安いです。<br /> <br /> 昨日よりも安くて主婦には助かります。<br /> <br /> 味も美味しいです。 -------------------------------------------- ・ ・ ・ 要するに、改行のところに<br />タグを入れたいのです。 今までは、テキストエディタにコピペして、置換していたのですが、 マクロ（VBA）では、どのようにすればいいのでしょうか？ 教えて頂けないでしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルVBAのコードの書き方を教えてください
エクセルVBAの初心者です。 下記①-⑲のようなコードを書きたいのですが、どなたかお分かりになる方がいましたら、 ご教示いただけますと幸いです。 ① オートフィルターでシート[list]のA列に"●"がある特定の行だけを以下作業の対象にしたい ② ①で特定した行のE列セルの値を、シート[output]のB9セルにコピペする ③ ①で特定した行のF列セルの値を、シート[output]のB12セルにコピペする ④ ①で特定した行のG列セルの値を、シート[output]のB15セルにコピペする ⑤ ①で特定した行のH列セルの値を、シート[output]のB18セルにコピペする ⑥ ①で特定した行のI列セルの値を、シート[output]のB21セルにコピペする ⑦ ①で特定した行のJ列セルの値を、シート[output]のB24セルにコピペする ⑧ ①で特定した行のK列セルの値を、シート[output]のB27セルにコピペする ⑨ ①で特定した行のL列セルの値を、シート[output]のB30セルにコピペする ⑩ ①で特定した行のM列セルの値を、シート[output]のB33セルにコピペする ⑪ ①で特定した行のN列セルの値を、シート[output]のB36セルにコピペする ⑫ ①で特定した行のO列セルの値を、シート[output]のB39セルにコピペする ⑬ ①で特定した行のP列セルの値を、シート[output]のB42セルにコピペする ⑭ ①で特定した行のQ列セルの値を、シート[output]のB45セルにコピペする ⑮ ①で特定した行のR列セルの値を、シート[output]のB48セルにコピペする ⑯ ①で特定した行のS列セルの値を、シート[output]のB51セルにコピペする ⑰ ①で特定した行のT列セルの値を、シート[output]のB54セルにコピペする ⑱ ①で特定した行のU列セルの値を、シート[output]のB57セルにコピペする ⑲ シート[output]のB3：B59をテキストファイルを呼び出してコピペする ※このとき、上記②-⑱で記述したB9からB57のセルには改行が含まれる場合が あるため、テキストファイルへのペースト時に""が表示されてしまうが、 もし可能であれば、この""が表示されないようにしたい。
- ベストアンサー
- Visual Basic
- EXCEL 2010 VBAまたは関数について
こんにちは 初投稿です。 早速ですが、VBAまたは関数について質問させて頂きたいのですが・・・ 一つのセルに複数の数字と文字列がセルのE1混ざっている場合, （12345abc678cdef9ghijk)と入っている場合 にこの例で行くとセルのA1に12345セルB1に678セルC1に9というように数字で表示させたいのです が、最初関数で A1=VALUE(MID(E1,1,5)) B1=VALUE(MID(E1,9,3)) C1=VALUE(MID(E1,16,1)) と言う形で数字だけ抜き出していたのですが これだと数字の桁数が違ってくる（※正し文字列の長さは一緒 数字だけが桁が違ってきます） と表示されなくなってしまうため、 出来れば関数をいじらなくても表示されるようにしたいのです。 VBAもしくは関数でこの問題を解決出来る方がいらっしゃるなら どうぞよろしくお願い致します。 長文失礼致しました。 | A | B | C | D | E | ------------------------------------------------ 1 | 12345 | 678 | 9 | | 12345abc678cdef9ghijk | 2 | | | | | |
- ベストアンサー
- オープンソース開発
- Excel VBAについて教えて下さい。
VBAについて2点ほど質問があります。 (1)複数セル(例：A2:A40）に入力されている文字列を一括で数値に変換するVBAはありますか？ (2)複数セル(例：A2:A40）に日付と時間が入力されていて(例：2019/09/12 16:00)、それを一括で日付と時間それぞれ別々のセルへ表示させるVBAはありますか？ 現状、1つのセルしか変換できず複数一度には難しいのでしょうか？ お分かりの方いましたら、是非ご教示お願い致します。
- ベストアンサー
- Excel（エクセル）
- ＥＸＣＥＬ ＶＢＡの日付関数について
ＥＸＣＥＬ ＶＢＡの日付関数のことでお聞きしたいことがあります。 エクセルの関数でワークデイ関数がありますが、例えば Ｃ１セル： =WORKDAY(A1,10,B1:B10) これをＶＢＡのコードで書くと、どういうコードになるのでしょうか。 ＶＢＡの関数については詳細に書かれたテキストを持っておらず、WorksheetFunctionを使ってチャレンジしてみましたが どうも上手くいきませんでした。 初歩的な質問かも知れませんが、どうぞよろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excel97 VBA とVBSのsplit関数
新しい職場で、Excel VBAでデータを取り込み、それを改行文字ごとにsplit関数で区切って配列に入れようとしました。 arr=split(文字列,vbcrlf) って感じでですね。しかし、なんとその職場のExcelのバージョンが97のため、VBAでsplit関数が使えず、この意図が実現できませんでした。そのため、ネットで調べてVBScriptのsplit関数を流用しようとしたのですが、「終了していない文字列型の定数です。」とエラーが出てしまいます。ソースは次のとおりなのですが、どう直せばいいでしょうか。改行文字で区切るのでなく、カンマなどで区切るのなら、上手く出来るのですが・・・。 Sub sample() Dim vs As Object Dim rtn As Variant Dim q As String Dim buf As String q = Chr$(34) 'ダブルクォーテーション Set vs = CreateObject("ScriptControl") vs.Language = "VBScript" 'Excel97のVBAにはsplit関数がないのでVBSからsplitを流用 buf = "1" & vbCrLf & "2" & vbCrLf & "3" '改行で区切った文字。実際は、もっと複雑な文字を取り込みます。 rtn = vs.Eval("split(" & q & buf & q & ", vbCrLf)") 'Excel97のVBAにはsplit関数がないのでVBSからsplitを流用 Debug.Print rtn(1) 'ここで「終了していない文字列型の定数です。」エラーが出る End Sub
- ベストアンサー
- Excel（エクセル）
- EXCEL セルにコピペした時に書式が勝手に変更されるのを防ぎたい！
赤い字で書かれたネットの文章をセルにコピペすると、コピペしたセルの文字まで赤くなってしまいます。 文字のサイズやハイパーリンクなども引き継がれてしまいます。 勝手に改行されて行の高さが変更されたりもします。 F2を押してセルを編集状態にしてからペーストすれば文字列だけがペーストされるのですが、大量に作業する時にはその操作すら煩雑になってしまいます。 文字列だけをペーストする、いい方法は無いでしょうか？
- ベストアンサー
- その他MS Office製品
- エクセル 関数
エクセルの関数式で質問です。 VBAはまだよくわからないので関数で下記はできますか A1 あ A2 い A3 A3に「あ」という文字を検索値として 次の行にある「い」を抽出する ※次の列ではなく次の行がいいです。 使うデータは毎回コピペしてくるので セルの位置は毎回ずれるため 「あ」をキーワードにして次の行を抽出したいです。
- ベストアンサー
- Excel（エクセル）
お礼
ありがとうございます。 勉強になりました。
補足
ありがとうございます。 &CHAR(10)& 知りませんでした。 便利ですね。 ただ、理想は下記のようになります。 A列の1月1日に複数名前があった場合、 右側の日付列（G列）の1月1日にその複数の値を &CHAR(10)& を利用し改行して一つのセルに入力できる 関数式はありますでしょうか。 もし可能であれば教えていただけると幸いです。