ＶＢＡ：非表示のＢＯＯＫの扱い

質問

非表示になっているBook（ファイル　"aaa"）のSHEET１に
Bookを非表示のまま

テキストボックスを追加し、
その中に”ＡＢＣ”の文字を書き込み、
文字を赤字に、
テキストボックスを赤枠に

する方法を教えて下さい。

いつもはアクティブにしてセレクトしてから処理していたので、非表示のままの方法が分かりません。

お分かりの方お願いいたします。

回答No.1

guruguru2 · ベストアンサー

こんにちは(^^)

Dim book As Excel.Workbook

'(1)ブックを開く
Set book = Workbooks.Open(ThisWorkbook.Path & "\aaa.xls")

'(2)ブックを非表示
book.Windows(1).Visible = False
'(3)対象シートをアクティブに
book.Worksheets("Sheet1").Activate

'(4)詳細設定
'☆テキストボックスを追加
'☆"ABC"文字設定
'☆文字色・線色　赤に設定

'(5)ブックを表示
book.Windows(1).Visible = True

set book = nothing

ではいかがでしょうか？
(3)を実行した後は
>いつもはアクティブにしてセレクトしてから処理していたので、非表示のままの方法が分かりません。

と仰っていることから今まで使用していたプログラムで対応できるはすですよ(^^)

お礼

回答ありがとうございます。

非表示でもACTIVEに出来るのですね。
これなら何でも出来そうです。