XL 2013 Archives tableau vers un autre classeur

RomainPOIRET · 18 Octobre 2019

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

Staple1600 · 20 Octobre 2019

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 · 20 Octobre 2019

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

XL 2013 Archives tableau vers un autre classeur

RomainPOIRET

XLDnaute Occasionnel

Staple1600

Staple1600

XLDnaute Barbatruc

Discussions similaires