copier les valeurs d'une feuille ds un nv classeur - VB/VBA/VBS - Programmation
Marsh Posté le 07-01-2005 à 21:12:26
Bonsoir,
Au pifomètre et sans essai...
après Workbooks.Add
je verrais bien quelque chose comme
Worksheets(1).[A1].Select
Selection...
Parce que sinon ta selection elle pointe sur rien du tout...
Ok ?
Marsh Posté le 07-01-2005 à 20:28:45
Bonsoir
Comment faire pour copier les valeurs/formats d'une feuille dans un nv classeur. Ca fait bien longtemps que je cherche mas j'ai tj les formules liées au 1° classeur. J'ai essayé en enregistrant la macro (collage special) mais qd je recopie le resultat de l'enregistrement dans un module ca bloque tj sur la ligne en gras:
Sub Copie()
'Prépare la copie des valeurs dans un autre classeur
Sheets("Cheques" ).Select
nbEl = Range("A1" ).Value
Range(Cells(1, 1), Cells(nbEl, 25)).Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub
le nv classeur est bien crée mais il n'y a rien dedans. j'ai aussi essayé de copié la feuille; là j'ai bien un nouveau classeur avec la feuille copiée mais toutes les cellules ayant une formule ont un lien avec le classeur d'origine. Comment faire! Merci