0

チェックボックスがクリックされたときに Excel セルの内容を別のワークシートに移動したい、元の内容をクリアしたい、Google で検索しても解決策が見つからない、方法がわからないそれをしてください、いくつかのコードを書くための最良の方法をアドバイスしてください

ありがとうございました

4

1 に答える 1

0

Excel 2010 以降では、[ファイル] -> [オプション] に移動して開発者メニューを有効にし、左側の列にある [リボンのカスタマイズ] をクリックします。右端の列で、[開発者] と書かれたボックスにチェックを入れて [OK] をクリックします。

トップバーに表示されている開発者タブの下で、「Visual Basic」を選択します。

左の列の「Microsoft Excel オブジェクト」行を右クリックし、「挿入」->「モジュール」

右側の (空の) メイン ウィンドウで、次のコードをコピーします。

Sub MoveData()
  if ThisWorkbook.Worksheets(1).Shapes("Check Box 1").OLEFormat.Object.Value = 1 then
     Range("A1:A5").Select
     Selection.Cut
     Sheets("Sheet2").Select
     Range("A1").Select
     ActiveSheet.Paste
     Range("A1").Select
  End If
End Sub

次に、Excel ワークシート (sheet1 を想定) に戻り、[開発者] タブで [挿入] をクリックして、チェックボックスを選択します。チェックボックスを配置するワークシート上の四角形をドラッグします。

チェックボックスを右クリックして「マクロを割り当て」ます。「MoveData」を選択し、「OK」をクリックします。

セル A1 から A5 までのシート 1 にデータを入力し、チェックボックスをオンにします。シート 1 から削除し、シート 2 に貼り付けます。

チェックボックスをオフにすると、何も起こりません。

チェックボックスの名前を変更したい場合は、右クリックして「フォーマットコントロール」を選択し、「代替テキスト」を変更します。マクロコードをそれに合わせて変更してください。

于 2013-09-11T22:27:43.650 に答える