Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

éviter les doublons(dates)

julie999

XLDnaute Occasionnel
bonjour
j'ai une macro qui me recopient les données dans ce tableau
quelle solution y a t il pour éviter les doublons par rapport a la date

en faite avant de copier les données interroger si il y a déjà des données a la date du 15 déc si oui écraser les anciennes données pour accepter les nouvelles sinon se rendre a la première cellule vide de la colonne A pour copier les données

voici le code que j'utilise pour le moment
Sub Macro1()
'
' Macro1 Macro
' Reporting
'

'

Sheets("Réception").Select
Range("AG9:CR11").Select
Selection.Copy
Sheets("Reporting complet").Select
""trouver le code pour se rendre a la premiere celulle vide de la colonne A"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Sheets("Réception").Select
Range("CT8:CW10").Select
Application.CutCopyMode = False
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets("Reporting palettes par jour").Select
""trouver le code pour se rendre a la premiere celulle vide de la colonne A"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A12").Select
Sheets("MENU").Select
End Sub

Julie
 

Pièces jointes

  • Classeur1test.xlsx
    24.5 KB · Affichages: 34
  • Classeur1test.xlsx
    24.5 KB · Affichages: 39
  • Classeur1test.xlsx
    24.5 KB · Affichages: 38

Discussions similaires

Réponses
2
Affichages
189
Réponses
5
Affichages
215
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…