Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

26541 / 76738

←次へ　｜　前へ→


	【55528】Re:毎月動いていたVBが突然動かなくなりました。

zaitsev - 08/5/9(金) 17:56 -


	引用なし

	パスワード

▼ひげくまさん：
>ちなみに、この式(命令)は、ちゃんとコピペしていますか？
>Range("O1") のあとが全角スペースになっているのが気になるのですが。

すみません。分かりやすくするために、少し内容を変えた時に、全角スペースが入ってしまったようです。
コードをそのままコピペします。

　　Range("O6") = "=VLOOKUP(F6," & MyThisFile & "!$B$2:$F$1000,5,FALSE)"
　　Range("O6").Select
　　Selection.Copy
　　Range(Cells(6, 15), Cells(MyLastRow, 15)).Select
　　ActiveSheet.Paste

と、こんな感じです。

シートの指定は、テーブルファイル "B.xls" から、
うまくシート名が取得できなくて、今、苦戦しているところです。

　　MyThisSheet = ThisWorksheet.Name

で、「オブジェクトが必要」と出てしまうのですが、
どうしたらよいか教えて頂けないでしょうか。重ね重ねすみません。

3 hits

▼

【55522】毎月動いていたVBが突然動かなくなりました。 zaitsev 08/5/9(金) 14:52