Macro de copie avec un nom d'onglet qui change
Bonjour,
Voilà j'ai un problème je voudrais une macro qui me copie les données d'un onglet vers un autre.
Mais le soucis est que le 2ème onglet (par exemple "test") n'aura jamais le même nom.
J'ai cette macro, mais du coup, çà ne marche plus lorsque je change le nom de l'onglet "test".
Pouvez-vous m'aider ?
Sub Macro4()
'
' Macro4 Macro
'
'
Sheets("Sauv").Select
Rows("120:132").Select
Range("M120").Activate
Selection.Copy
Sheets("test").Select
Rows("120:120").Select
Range("M120").Activate
ActiveSheet.Paste
End Sub
Bonsoir,
Une des façons de faire est d'insérer un InputBox et renseigner le nom de la feuille et la variable qui récupère le nom de la feuille est à renseigner dans la macro.
Feuille = InputBox("Nom Feuille copie ?", "Feuille Copie")
Sheets(Feuille).Selectbonsoir,
une autre solution, macro à lancer après avoir sélectionné la feuille de destination
Sub copie()
Sheets("Sauv").Rows("120:132").Copy Rows("120")
End Sub