honda さん
-
nice! 3
記事 105
テーマ パソコン・インターネット
プロフィール
ブログを紹介する
マクロでブックのフルパスを取得する。 EXCEL VBA [マクロ]
以下はブックのフルパスを、アクティブセルに順番に書き込みます。
Sub fullpasu()
Set A = GetObject(, "Excel.Application")
For Each i In A.Workbooks
ActiveCell.Value = i.FullName
ActiveCell.Offset(1).Select
Next
End Sub
Sub fullpasu()
Set A = GetObject(, "Excel.Application")
For Each i In A.Workbooks
ActiveCell.Value = i.FullName
ActiveCell.Offset(1).Select
Next
End Sub
2008-10-05 06:28
nice!(0)
コメント(0)
トラックバック(0)
クリック募金 各サイトに直接つながります。http://www.cosmo-oil.co.jp/kankyo/charity/
http://www.able.co.jp/company/contribute/new-action/clickable/
http://kakaku.com/donation/
http://www.j-energy.co.jp/cp/society/click_tp.php
http://www.chintai.net/contribution/index.html
http://www.nittsu.co.jp/corporate/contribution/1click.html
http://www.daiichisankyo.co.jp/csr/clickdonation/index.html
http://www.nippn.co.jp/csr/unicef/oneclick.html
コメント 0