XL 2013 Archives tableau vers un autre classeur

RomainPOIRET

XLDnaute Occasionnel
Bonjour à tous,

Un petit problème se pose,

J'ai un tableau dans une feuille A d'un classeur A que je voudrais "couper" pour le coller dans la feuille A d'un classeur B, je souhaiterai coller UNIQUEMENT les valeurs, pas les formules de ce tableau,

Je n'y arrive pas sur VBA,

Avez-vous des idées ?

Cordialement,

Romain
 
Solution
Bonjour le fil

Avez-vous des idées ?
Oui. Deux

1) Utiliser le moteur de recherche interne du forum
(Cette question a du être traitée moult fois ;))
2) Tester le code VBA ci-dessous
(test OK sur mon PC - pré-requis: les deux classeurs sont ouverts)
VB:
Sub Couper_A_vers_B()
Dim Source As Workbook
Dim Desti As Workbook
Set Source = ThisWorkbook
Set Desti = Workbooks("Classeur2")
Source.Sheets(1).Range("A1").CurrentRegion.Cut Desti.Sheets(1).Range("A1")
Desti.Sheets(1).UsedRange = Desti.Sheets(1).UsedRange.Value
Application.CutCopyMode = False
End Sub

Staple1600

XLDnaute Barbatruc
Bonjour le fil

Avez-vous des idées ?
Oui. Deux

1) Utiliser le moteur de recherche interne du forum
(Cette question a du être traitée moult fois ;))
2) Tester le code VBA ci-dessous
(test OK sur mon PC - pré-requis: les deux classeurs sont ouverts)
VB:
Sub Couper_A_vers_B()
Dim Source As Workbook
Dim Desti As Workbook
Set Source = ThisWorkbook
Set Desti = Workbooks("Classeur2")
Source.Sheets(1).Range("A1").CurrentRegion.Cut Desti.Sheets(1).Range("A1")
Desti.Sheets(1).UsedRange = Desti.Sheets(1).UsedRange.Value
Application.CutCopyMode = False
End Sub
 

Discussions similaires