前々回書いたマクロの改善版です 「A→B(コピー)→A(ペースト)」頑張ってエクセルマクロ組んだので会社で使えるようここに貼っておく - 思考の漏洩 以下本文 Sub ひらく() '' ひらく Macro'Dim saisyonosiito As WorksheetSet saisyonosiito = ActiveSheet 'シ…

例によって会社用の転記用です Sub sample()Dim fileName As StringfileName = Range("A1") & " " & Range("B1") 'ファイル名作成If MsgBox(fileName & " で保存しますか？", vbYesNo) <> vbYes Then Exit Sub '保存するか確認して保存しない場合は終了Appli…

題にあるとおり エクセルのマクロを組みました。 自宅のパソコンやスマホからメールを送っても会社PCでは弾かれるので ここに書いてコピペします。 万一このマクロを利用する方がいらっしゃった時のために 軽く解説を書いておきます。 あと、職場の同僚が分…