Bonjour a tous voila mon soucci j'ai un code qui fonctionne parfaitement depuis plus de 3 ans (je ne veux surtout pas le modifier...)
Mais j'aimerais y rajouter une nouvelle fonction :
Donc ca creer un nouveaux xlsm, copie la feuil mentione dans la combo5, sauvegarde sous le nom tb16, ferme le et sauvegarde le nouveaux fichier....
J'aimerais en fait rajouter une option : Si la textbox26 de mon user = oui alors ca me copie egalement la feuil REGPLQ dans le meme nouveaux fichier .... sinon procede normal que la feuil combo5
voila je vous met un petit fichier merci a tous !
Mais j'aimerais y rajouter une nouvelle fonction :
Code:
'SAUVEGARDE XLSM DOSSIER PERSO
fichier = ActiveWorkbook.Path & "\XLSM\" & TextBox16.Value
Sheets(ComboBox5.Value).Copy
ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs FileFormat:=ThisWorkbook.FileFormat, Filename:=fichier
ActiveWorkbook.Close
Donc ca creer un nouveaux xlsm, copie la feuil mentione dans la combo5, sauvegarde sous le nom tb16, ferme le et sauvegarde le nouveaux fichier....
J'aimerais en fait rajouter une option : Si la textbox26 de mon user = oui alors ca me copie egalement la feuil REGPLQ dans le meme nouveaux fichier .... sinon procede normal que la feuil combo5
voila je vous met un petit fichier merci a tous !