マクロでボタンを押したら、空白のセルでB７から順にB8、B9と下の行に”貼り付け”が出来るようにする為のコードを教えてください。
マクロでボタンを押したら、空白のセルでB７から順にB8、B9と下の行に”貼り付け”が出来るようにする為のコードを教えてください。
Visual Basic | Excel・51閲覧・100
ベストアンサー
すでにどこかのセルがコピーされているとして。。。 Sub ボタン1_Click() Static rl As Long If rl = 0 Then rl = 7 Cells(rl, "B").PasteSpecial rl = rl + 1 End Sub rl はどんどん＋１されるので、B7に戻したければイミディエイトウィンドウで End を実行します。 （あるいはリセットボタンを設けて、そこで End を実行させてもＯＫ）
この返信は削除されました
