Excel VBA質問箱 IV

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

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


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

33916 / 76734

←次へ　｜　前へ→


	【48033】Re:列番号の下に任意の表を移動したい

ichinose - 07/3/31(土) 22:17 -


	引用なし

	パスワード

▼45歳さん：
こんばんは。

>シートの中にいくつかの表が有ります。
>目的の表に行きやすいように、下記の様にジャンプする様にしました。
>しかし、列番号の下にちゃんと表が移動しません。
>zaiko001は問題なのですが、zaiko002は近い所にはいくのですが・・・。
>１表は69行です。
>
>Sub zaiko001()
>　　Sheets("Sheet2").Select
>　　Range("a1000").Select
>　　Range("a1").Select
>End Sub
　　Application.Goto Worksheets("sheet2").Range("a1"), True

>
>Sub zaiko002()
>　　Sheets("Sheet2").Select
>　　Range("a1000").Select
>　　Range("a70").Select
>End Sub
　　 Application.Goto Worksheets("sheet2").Range("a70"), True

を試してください。

0 hits

▼

【48032】列番号の下に任意の表を移動したい 45歳 07/3/31(土) 21:54