タグ

2022年3月1日のブックマーク (3件)

  • Office TANAKA - Excel VBA Tips[画像を挿入する]

    ワークシート上に画像を挿入するには、次のようにします。 Sub Macro1() ActiveSheet.Pictures.Insert "C:\Work\Sample1.jpg" End Sub 画像を、アクティブシートに挿入するときは、必ずアクティブセルに挿入されます。正確に言うと、アクティブセルの左上に画像の左上がくるように挿入されます。 次のように、シートを指定すれば、アクティブシートではない(表示されていない)シートに画像を挿入することもできます。 Sub Macro2() Sheets("Sheet1").Pictures.Insert "C:\Work\Sample1.jpg" End Sub このように、挿入するシートがアクティブシートではなかった場合、画像は常にセルA1に挿入されます。そりゃそうですね。だって、アクティブシートではないシートに、アクティブセルはありませんか

    hsato2011
    hsato2011 2022/03/01
    画像を入力する
  • 複数ブックのシートを1つのブックにコピーする:Excel VBA|即効テクニック|Excel VBAを学ぶならmoug

    複数ブックのシートを1つのブックにコピーする (Excel 2000/2002/2003/2007/2010/2013/2016) ツイート 特定のフォルダにある複数のブックから、特定のシートを1つのブックにコピーして集約します。 次のサンプルは、"C:\Data\Source\"フォルダ内のすべてのExcelブックについて、「報告書」という名前のシートを新規ブックにコピーします。 このとき、集約用ブック内のシート名が重複しないよう、シート名をそのシートのセルA1の値に変更します。 Sub Sample() Dim sFile As String Dim sWB As Workbook, dWB As Workbook Dim dSheetCount As Long Dim i As Long Const SOURCE_DIR As String = "C:\Data\Source\" C

    hsato2011
    hsato2011 2022/03/01
    エクセルのシートを一つにまとめる
  • ラクザネット

    「さて帰るか・・・上司さんお先です!」 「ちょうどいいや、明日までにこのファイル1つにまとめておいてね」 「え?1000ファイルもありますよ!」 「あ、これも。100個エクセルデータ合併しておいてね」 「え?」 こんなことになっても、大丈夫! 今から、まとめのスペシャリストとして、上司に・同僚に頼られること間違いなし!? ちょっと待って、いきなりコードとか無理だわ それなら、動画学習がおすすめです。 いまさら聞けない、ExcelBook・シートをたった数秒でまとめる方法をご紹介。 巻末にExcelダウンロードファイルもあるよ! ※2015年09月18日 Ver1.1 へアップデートしました。結合用のテストファイルを同胞しております。 ※2016年04月16日 Excelマクロの結合コードを自分の環境にする を追記しました。 無料パソコンスクール講座 WordPressSEO・プログラミン

    ラクザネット
    hsato2011
    hsato2011 2022/03/01
    複数ファイルのエクセルのシートのみを結合する処理に使えそう。学籍簿作成