Excel - 記録ボタンへのマクロ
問題
Excelファイルに "Record"というコマンドボタンを作成したいのですが。
誰かがボタンをクリックすると、マクロは、その人が自分の名前を入力したセルとそれぞれの日付を含むセルを取り出し、そのデータをブックに保存します。
溶液
- ワークブックを開く
- VBA Alt F11を開く
- 左上のThisWorkbookをダブルクリックしてください
- 右ウィンドウを右クリック
このウィンドウの下のコードをコピーしてください
Sub Macro_Enregistrement()Dim Nom_Fichier、Chemin、「決まった1つのChemin = "C:\ ........... \" 'A1 et A2、変更の必要がありますNom_Fichier = Worksheets( "Feuil1") .Range( "A1")&Worksheets( "Feuil1")。Range( "A2")& ".xlsm" retval = MsgBox( "Voulez enregistrer ce fichier:"&Nom_Fichier& "?"、vbYesNo)retvalの場合= 6その後、Reponse = "Fichier"&Nom_Fichier& "sauvegardé" ActiveWorkbook.SaveAsファイル名:= Chemin&Nom_Fichier、_ FileFormat:= xlOpenXMLWorkbookMacroEnabled、CreateBackup:= Falseそれ以外の場合= "Fichier nonsauvegardé"終了サブ
- ボタンを作成してマクロを割り当てます。
この情報を提供してくれたf894009に感謝します。