Bonjour,
J'ai associé la formule ci dessous à un bouton qui se trouve sur une feuille qui appartient a un classeur. Quand je clique sur le bouton l'enregistrement de la feuille s'effectue mais quand j'ouvre le document enregistré je retrouve le classeur complet. Que dois je modifier pour que le document enregistré ne contiennent que la feuille sur laquelle le bouton est installé ?
Merci
Sub cmdEnregistrer_Click()
Dim strChemin As String
Dim strNomFic As String
' Si le nom du fichier n'est pas saisi, message alerte et on ne fait rien
strNomFic = Range("E17").Value
strChemin = Range("E16").Value
' Enregistrement
ActiveSheet.SaveAs strChemin & "\" & strNomFic
End Sub
J'ai associé la formule ci dessous à un bouton qui se trouve sur une feuille qui appartient a un classeur. Quand je clique sur le bouton l'enregistrement de la feuille s'effectue mais quand j'ouvre le document enregistré je retrouve le classeur complet. Que dois je modifier pour que le document enregistré ne contiennent que la feuille sur laquelle le bouton est installé ?
Merci
Sub cmdEnregistrer_Click()
Dim strChemin As String
Dim strNomFic As String
' Si le nom du fichier n'est pas saisi, message alerte et on ne fait rien
strNomFic = Range("E17").Value
strChemin = Range("E16").Value
' Enregistrement
ActiveSheet.SaveAs strChemin & "\" & strNomFic
End Sub