|
メニューの〔ツール〕→〔マクロ〕→〔Ｖisual Ｂasic Ｅditor〕を選択します メニューの〔挿入〕→〔標準モジュール〕で 〔標準モジュール〕が右の編集欄に表示されたら〔名前〕に〔search〕と入力して 〔ＯＫ〕を押します Public Sub search（）が作成されますのでそこへ Dim param1 As String Dim data As String Dim i As Integer data = "データがありません" i = 0 param1 = Sheet1.Cells(2, 6).Value For i = 2 To 11 Step 1 If param1 = Sheet1.Cells(i, 1).Value Then data = Sheet1.Cells(i, 2).Value Exit For End If Next Sheet1.Cells(6, 6) = data と記述します 保存します。 【ＶＢＡを実行するためのボタンを作る】 〔四角形〕を描き〔テキストの追加〕で〔ボタン〕に表示する文字を入力します 〔四角形〕を選択状態にして〔右〕クリックでメニューから〔オートシェイプの書式設定〕を選択します 〔色〕や〔文字〕の配置を設定したら完了します 【マクロの登録画面から選択する】
〔四角形〕の枠を選択状態にして〔右〕クリック〔マクロの登録画面〕が表示されたら 上で作成した〔search〕を選択して〔ＯＫ〕を押します 保存します |
- >
- コンピュータとインターネット
- >
- コンピュータ
- >
- パソコン
これでだいたい準備完了だね〜〜〜(^^
2006/2/25(土) 午後 4:39 [ なお ]
もう少しです。今日は（２）と（３）を続けてやってみました。続けてやった方が分るような気がしますので…ヾ(@~▽~@)ノ
2006/2/25(土) 午後 8:16
そういうときもあるよね 間があくとちょっと忘れちゃうこともあるもんね そんなときはひとまとまりをやれるときはやってみるといいかもしれないよね(^^
2006/2/26(日) 午後 3:13 [ なお ]
なおさん、調子の良い時はそのまま続けた方がいいような気がします。息切れする時の方が多いんですが…(ﾉ_σ)ｸｽﾝ
2006/2/27(月) 午前 9:04