とても横方向に長い表に入力作業をしています。
縦方向は日付、横方向に入力項目があります。
ウインド枠を固定させて項目表示されるように設定していますが、横方向に長いため、スクロールが大変です。
現在は、ハイパーリンクを使ってボタン的に使用しようかと考えております。
項目名をリンク先にしてリンク元の名前をクリックすれば、その項目のところへジャンプでき、わざわざスクロールしなくてもすむと考えたからです。
ところが、縦方向にスクロールして入力するくらいのセル番地でハイパーリンクを使ってジャンプすると、縦方向のスクロールが元に戻ってしまいます。
横方向は楽になったのですが、今度は縦方向にスクロールしなくてはなら無い状況になります。
ちなみに、リンク元の名前は、ウィンド枠の固定で固定した左上に作ってあります。
それと、名前を定義して範囲指定で項目を表示させるようにやってみましたが、同じ結果でした。
どなたか、ジャンプで横スクロールを楽にする方法を教えてください!
No.1ベストアンサー
- 回答日時:
名前ボックスにAA80とか入れるのはダメですか。
AA80が判らないのでしょうか。
C3などでウインドウ枠を固定しても、AA1とかを範囲に名前をつけ名前ボックスで選択するとAA1にカーソルが行きましたが。
もうすこし、したいことを丁寧に説明してください。
ーー
VBAで勝手にやってみた。指定が七面倒くさいが
例データ
A列 A2から
2007/1/1から毎日、連続して日にちを入れた。
第1行には、A1、A2、A3・・と見出しのつもりで文字列を入れた。
シートにボタンを1つ張り付け、クリックイベントに
Private Sub CommandButton1_Click()
d = InputBox("日=")
m = Split(d, "/")
ds = DateSerial(2007, m(0), m(1)) - #1/1/2007# + 2
'MsgBox ds
c = InputBox("列見出し")
y = Application.WorksheetFunction.Match(c, Range("A1:IV1"), 0)
'MsgBox y
ActiveWindow.ScrollColumn = y
ActiveWindow.ScrollRow = ds
End Sub
を貼り付ける。
ボタンをクリックすると、2/3のような日付(年部分なし)と項名を項目名どおり入力すると、左上隅のセルが該当こうてんセルになっているはず。
設定や操作では適当な回答がなく、諦めきれないなら考えてみたら。
ーー
問い合わせを1回にして
Private Sub CommandButton1_Click()
d = InputBox("日付け,項目名=")
m = Split(d, ",")
ds = DateValue("2007/" & m(0)) - #1/1/2007# + 2
MsgBox ds
y = Application.WorksheetFunction.Match(m(1), Range("A1:IV1"), 0)
MsgBox y
ActiveWindow.ScrollColumn = y
ActiveWindow.ScrollRow = ds
End Sub
入力は 2/3,A35(日付,項目名。カンマで区切る)のように入力する。
この回答への補足
「名前ボックスを使用して」というヒントを頂いて、いろいろとやってみました。名前を定義する際のセルの範囲を先頭行から入力が必要な最後の行まで広範囲に指定したら、先頭行に戻ることなくスクロールする事ができました。
指定した範囲全部が選択状態となりますが入力作業には支障ありません。
これなら、作業が簡便化できます。
良いヒントを頂き有難うございました!!
ご回答ありがとうございます。
仕事の合間合間で質問を書いていたので、丁寧に記入することができなくてスイマセン。
もう一度、ご説明いたしますと以下のようになります。
・縦(列)方向には日付を設定。
A3を月初めの1日とし月末まで設定します。
それ以降は翌月の設定にするため12月分まで作成します。
・横(行)方向には項目を設定。
B2から約50項目設定します。
・「ウィンド枠の固定」はB3で設定しています。
A1に仮に「JUNP」と文字を入力し、ハイパーリンクを設定します。
ジャンプ先に「V2」のセルを指定します。
入力作業が100番目の行の時にこのハイパーリンクを使うと、縦方向のス
クロールがウィンド枠の固定をしているにもかかわらず、スクロールして
いない状態に惑ってしまい、また100番目の行までスクロールして作業し
なくてはなりません。
■困っていること
・例えば、3月分に入力をしてると仮定します。
3月分ともなると縦方向にかなりスクロールして作業をしている
状態です。
そして、各項目にデータを入力していくわけですが、20項目目
くらいからはスクロールバーにて入力したいセルまでスク
ロールして入力することになります。
この入力する項目までスクロールして、必要なセルを見つけるのが
大変で、間違ったセルに入力してしまうミスが連発してしまいます。
そこで、ハイパーリンクを使ってA列の余ったセルにリンク元となる
セルを作り、ジャンプ先の項目にリンクを張ってみました。
縦方向にスクロールしている状態で、ジャンプするとスクロールして
ない状態に戻ってしまいます。
これでは意味がないので、入力している行番号の位置でジャンプした
いのです。
ーーー
こんな説明でご理解いただけますでしょうか?
ご説明いただいた内容は明日出社したら試してみます。
VBAはわからないので時間がかかるかもしれませんがやってみます。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルの散布図で新たに入力した値のデータラベルが空欄になる現象 1 2022/04/26 09:31
- Visual Basic(VBA) 【Excel VBA】条件に合った行の表示・非表示を行う方法 3 2023/03/18 12:31
- その他(プログラミング・Web制作) GASでガントチャートを作りたいです 1 2022/09/05 17:26
- その他(ブラウザ) webサイトに表示する画像の向きを変える(左右に回す)方法 3 2023/01/20 08:28
- その他(ビジネス・キャリア) エクセルで一覧表を作るときのレイアウト、月日と項目の配置について相談です。 2 2023/04/11 09:37
- 高校 高校からの作文 今日高校から入学にあたっての 作文の宿題が出ました。 ですが書き方が分かりません。 2 2022/03/29 17:59
- Windows 95・98 Windows11の設定画面がスクロールできません。 2 2023/07/26 05:16
- その他(動画サービス) VLCメディアプレーヤーについて 1 2022/11/29 14:19
- Excel(エクセル) ExcelのIF関数について 4 2023/05/24 12:54
- 運転免許・教習所 泣きたいです。 私は教習に通っているのですが、なかなか2段階の卒検前のa判定が貰えません。 原因は縦 7 2022/04/12 18:27
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
エクセルVBAで5行目からオート...
-
VBAで複数の数式セルを最終行ま...
-
Accessで数値型にNULLをInsert...
-
Joy To Keyのマウスやキーボー...
-
セルの右クリックで出る項目を...
-
Oracle 2つのDate型の値の差を...
-
必須入力項目と入力必須項目
-
空白をそのままインポートする...
-
Access テキスト型に対する指定...
-
SELECT DISTINCT...
-
Accessレポートで特定条件で改...
-
DBのタイプの指定とサイズにつ...
-
ピボットテーブルでフィルター...
-
PC-98でHDDに複数OSを入れる...
-
BIOSでAHCIに設定したいが、項...
-
エクセルグラフの凡例スペース
-
Outlook 分類項目のLocalからSe...
-
指定した項目の列削除
-
Accessの表形式のフォームについて
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
エクセルVBAで5行目からオート...
-
Oracle 2つのDate型の値の差を...
-
セルの右クリックで出る項目を...
-
Access テキスト型に対する指定...
-
SUBSTRING 関数に渡した長さの...
-
Accessで数値型にNULLをInsert...
-
APN設定について教えていただけ...
-
エクセルグラフの凡例スペース
-
ORACLEでLONG項目からCHAR項目...
-
複数のレコードを1つのレコード...
-
空白をそのままインポートする...
-
アンドロイド おサイフケータイ...
-
access2000:フォームで入力し...
-
VBAで複数の数式セルを最終行ま...
-
株に関する用語集
-
必須入力項目と入力必須項目
-
他テーブルで一致する列から名...
-
BIOSでAHCIに設定したいが、項...
-
datファイルからaccessにインポ...
おすすめ情報