XL 2013 formule vba pour feuil

Guismo33

XLDnaute Occasionnel
Bonjour a tous,
je recherche un formule vba pour ceci :

regarde si le nom de la feuil existe.
si elle n'existe pas, creer là.
copie les infos d'une autre feuil
colle les infos dans la feuil creer.

merci à tous

bien à vous
 

Dranreb

XLDnaute Barbatruc
Bonjour.
Perso je ferais comme ça :
VB:
Dim FDest As Worksheet, NomFeuil As String
…
On Error Resume Next
Set FDest = ThisWorkbook.Worksheets(NomFeuil)
If Err Then Set FDest = Nothing
On Error GoTo 0
If FDest Is Nothing Then
  Set FDest = ThisWorkbook.Worksheets.Add
  FDest.Name = NomFeuil
  End If
FSrc.UsedRange.Copy Destination:=FDest.[A1]
 

Discussions similaires

Statistiques des forums

Discussions
312 335
Messages
2 087 386
Membres
103 531
dernier inscrit
dieubrice