Excel VBA質問箱 IV

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

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


55566 / 76732 ←次へ | 前へ→

【25938】Re:前回の値を保持する
お礼  GEN  - 05/6/18(土) 19:24 -

引用なし
パスワード
   GENです。
非常に早急なご返事ありがとうございます。
内容をもう少し具体的に書きますと下記のような書き方だと、ダイアログを開くとデータの先頭セルを表示することとなってしまいます。ここをさわることで、前回ダイアログ終了前の表示をおこなうことができるのでしょうか。
とりあえず、「ブックは、閉じないならば、Public変数にフォームを閉じるときの値を一時保存しておけばいい」という回答を参考にもう少し考えてみます。

Sub Hyouji(Myline As Integer)
'ダイアログにデータを表示する
  Dim MyRows As Integer
  MyRows = Form編集.Scroll移動.Value + 3
  Cells(MyRows, 1).Activate  'レコードの先頭セルの取得
  'セルの値をコントロールに表示する
  Form編集.Textタイトル.Text = ActiveCell.Value
  ActiveCell.Offset(0, 1).Activate
  Form編集.Textアーティスト.Text = ActiveCell.Value
  
  If MaxLine = 0 Then   'レコードが存在しない場合
    Form編集.Label行数 = "1/1"
  Else          'レコードが存在する場合
    Form編集.Label行数 = Form編集.Scroll移動.Value _
              & "/" & Myline
  End If
End Sub


>Excelブックそのものを閉じるかどうかによって、変わってくると思います。
>ブックは、閉じないならば、Public変数にフォームを閉じるときの値を一時保存し
>ておけばいいと思います。
>ブックを閉じるならば、どこかのシートのどこかのセルに書き込んでおくことかと
>思います。

0 hits

【25935】悩んでます。 GEN 05/6/18(土) 15:52 質問
【25936】Re:前回の値を保持する かみちゃん 05/6/18(土) 17:12 発言
【25938】Re:前回の値を保持する GEN 05/6/18(土) 19:24 お礼
【25941】Re:前回の値を保持する ichinose 05/6/19(日) 8:56 発言

55566 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free