Microsoft 365 Couper une feuille d'Excel d'un dossier et l'a coller dans un autre fichier d'Excel

yassine.013 · 13 Mars 2023

Bonjour à tous,

Je souhaite couper une feuille d'Excel "Template" qui se trouve fichier dans "Template 13.03.2023.xlsm"(le Template il se met a jour tous les jours) dans un dossier outil et l'a coller dans un nouveau dossier "outil prod" contenant le fichier "jour.xlsx" et dans la feuille "j-1".

Merci de votre aide

Hieu · 16 Mars 2023

Bonjour Yassine,

J'ai créé un petit outil, ca devrait marcher? Difficile de répondre sans matière

Voici le code :

VB:

Sub mlk()
f_cut = Range("c2")
o_cut = Range("d2")
f_paste = Range("c3")
o_paste = Range("d3")

Workbooks.Open (Range("b2") & f_cut)
Workbooks.Open (Range("b3") & f_paste)
tt = Range("c2")
Windows(f_cut).Activate
Sheets("Template").Cells.Cut

Windows(f_paste).Activate
Sheets(o_paste).Range("a1").Select
ActiveSheet.Paste

Workbooks(f_cut).Close True
Workbooks(f_paste).Close True

End Sub

Microsoft 365 Couper une feuille d'Excel d'un dossier et l'a coller dans un autre fichier d'Excel

yassine.013

XLDnaute Nouveau

Hieu

XLDnaute Impliqué

Pièces jointes

Discussions similaires