Bonsoir,
Je cherche a créer un un tableau "DONNEES" qui se remplit par macro avec des données importées quotidiennement "Feuil1" qui change chaque jour.
Le problème est qu'avec ma macro les données enregistrées ne sont pas gardées le lendemain.
De plus je ne sais pas comment recopier automatiquement cette macro sur les différents jours sans devoir recopier cellule par cellule.
Idéalement je souhaite aussi que quand il n'y a pas de donnée la cellule n'affiche rien au lieu de 0.
voici ma macro:
Sub Macro1()
'
' Macro1 Macro
'
'
Range("B6") = "=SUMIF(Feuil1!R1C1,DONNEES!R[-1]C,Feuil1!R2C2)"
Range("B7") = "=SUMIF(Feuil1!R1C1,DONNEES!R[-2]C,Feuil1!R3C2)"
Range("B6").Copy
Range("B6").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("B7").Copy
Range("B7").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
Merci
Damien
Je cherche a créer un un tableau "DONNEES" qui se remplit par macro avec des données importées quotidiennement "Feuil1" qui change chaque jour.
Le problème est qu'avec ma macro les données enregistrées ne sont pas gardées le lendemain.
De plus je ne sais pas comment recopier automatiquement cette macro sur les différents jours sans devoir recopier cellule par cellule.
Idéalement je souhaite aussi que quand il n'y a pas de donnée la cellule n'affiche rien au lieu de 0.
voici ma macro:
Sub Macro1()
'
' Macro1 Macro
'
'
Range("B6") = "=SUMIF(Feuil1!R1C1,DONNEES!R[-1]C,Feuil1!R2C2)"
Range("B7") = "=SUMIF(Feuil1!R1C1,DONNEES!R[-2]C,Feuil1!R3C2)"
Range("B6").Copy
Range("B6").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("B7").Copy
Range("B7").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
Merci
Damien