Microsoft 365 Copier feuille active dans nouveau classeur sans les liaisons en gardant le même format

  • Initiateur de la discussion Initiateur de la discussion juju91
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

juju91

XLDnaute Junior
Bonjour a tous
Encore besoin d'aide ...
J'ai une feuille que je souhaiterais copier dans un nouveau classeur en la moment ales la valeur contenue dans la cellule '' C2''.
Jusque la j'y arrive tous du moins je crois.
Mon problème est que dans la feuille d'origine des cellules sont liées à une autre feuille du classeur d'origine.
Je souhaiterais que lors de la création du nouveau classeur les données soient figées ( ne soient plus liées) et que la mise ne page et les format reste identique.
Comme d'habitude je sais pas si j'ai été très clair , je mets donc un fichier.
par avance merci de votre aide.
PS. je vais abuser...mai si il est possible une fois le fier creer il est possible qui ce refaire automatique, cela serait parfait...
Désolé
 

Pièces jointes

Bonsoir @juju91🙂,

Après avoir copié la feuille, exécuter l'instruction :
VB:
 ActiveWorkbook.Sheets(1).UsedRange.Value = ActiveWorkbook.Sheets(1).UsedRange.Value

Soit :
VB:
Private Sub CommandButton1_Click()
   Application.DisplayAlerts = False
   'Range("G1").Select
   Range("G2").Value = Now
   ActiveSheet.Copy
   ActiveWorkbook.Sheets(1).UsedRange.Value = ActiveWorkbook.Sheets(1).UsedRange.Value
   ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & Range("G1") & ".xls"
   Application.DisplayAlerts = True
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour