Excel VBA質問スレ Part5

Excel VBA質問スレ Part5 at TECH

263:デフォルトの名無しさん
08/01/04 09:52:52
>>259
再現した。　ワークシートの存在を確認するしかないかな？
　　Dim s As Worksheet
　　For Each s In Me.Worksheets
　　　　If UCase(s.Name) = UCase("20.1月") Then
　　　　　　s.Range("A1").Value = "='D:\[計算書.xls]20.1月'!$J$3"
　　　　　　Exit For
　　　　End If
　　Next
あるいは、可能であればワークシート別のイベントで処理させるとか。

次ページ

続きを表示

1を表示