copier les valeurs d'une feuille ds un nv classeur

copier les valeurs d'une feuille ds un nv classeur - VB/VBA/VBS - Programmation

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

Reply

Marsh Posté le 07-01-2005 à 20:28:45   

Reply

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 ?


Message édité par galopin01 le 07-01-2005 à 21:13:44
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed