Re : Copie automatique d'un tableau Excel dans une autre feuille
Bonjour !
Merci beaucoup pour cette réponse rapide et efficace.
Cependant, je ne suis pas du tout experte en macro et j'aimerais si tu as le temps que tu me traduises un peu plus clairement le langage vba que tu as inséré (l'anglais et moi sommes pas très amis ^^).
J'ai remarqué un petit souci concernant cette macro :
Je tape mon devis, j'appuie sur le bouton tout se passe comme prévu, le devis se transforme en facture (le tableau est donc inséré dans la feuille 'facture').
Je suis donc retournée sur le devis pour faire des modifications et quand j'ai rappuyé sur le bouton, Excel m'avertit que ma macro ne fonctionne pas, plus précisément Excel surligne cette phrase :
Cells.Find("*", Range("IV65536"), xlValues, , 1, 2, 0).Offset(2, -4).Name = "toto"
MACRO :
Option Explicit
Sub Devis_vers_Facture()
Application.ScreenUpdating = False
Sheets("FACTURE").Activate
Range("e20").CurrentRegion.Clear
Sheets("FACTURE").Range("a29").CurrentRegion.Cut Destination:=Range("az1")
Sheets("DEVIS COCKTAIL").Range("e20").CurrentRegion.Copy Destination:=Sheets("FACTURE").Range("a20")
Cells.Find("*", Range("IV65536"), xlValues, , 1, 2, 0).Offset(2, -4).Name = "toto"
Range("az1").CurrentRegion.Cut Destination:=Range("toto")
Cells.Find("*", Range("IV65536"), xlValues, , 1, 2, 0).RowHeight = 24.6
ActiveWorkbook.Names("toto").Delete
Application.ScreenUpdating = True
End Sub
Merci encore et bonne année !
Cordialement,
Blandine