„Excel“ - makro įrašymo mygtukas

Problema

Norėčiau Excel komandoje sukurti komandų mygtuką „Įrašyti“.

Kai kas nors spustelės mygtuką, makrokomanda užpildo langelį, kuriame asmuo įvedė savo vardą ir ląstelę, kurioje yra atitinkama data, ir įrašo duomenis į darbo knygą.

Sprendimas

  • Atidarykite savo darbaknygę
  • Atidarykite „VBA Alt F11“
  • Dukart spustelėkite kairįjį pelės klavišą kairėje pusėje
  • Dešiniuoju pelės mygtuku spustelėkite dešinįjį langą

Nukopijuokite žemiau esantį kodą šiame lange

 „Sub Macro_Enregistrement“ () „Dim Nom_Fichier“, „Chemin“, „Reponse 'A definir Chemin =" C: ........... "" A1 ir A2 keitiklis suivant vos besoin Nom_Fichier = darbalapiai ("Feuil1") .Range ("A1") ir darbalapiuose ("Feuil1"). Range ("A2") & ".xlsm" retval = MsgBox ("Voulezvous enregistrer ce fichier:" & Nom_Fichier & "?", VbYesNo) Jei retval = 6 Tada Reponse = "Fichier" & Nom_Fichier & "sauvegardé" ActiveWorkbook.SaveAs Failo pavadinimas: = Chemin & Nom_Fichier, _ FileFormat: = xlOpenXMLWorkbookMacroEnabled, CreateBackup: = False Else Reponse = "Fichier non sauvegardé" Pabaiga Jei retval = MsgBox (Reponse) Pabaiga 
  • Sukurkite mygtuką ir priskirkite makrokomandą.

Dėl šio patarimo f894009 .

Ankstesnis Straipsnis Kitas Straipsnis

Geriausi Patarimai