Bonjour à Tous
Je suis débutante et je bute sur un élément qui paraîtra surement très simple, voici ma macro :
Sub Nvlle_Feuille()
Sheets(1).Copy Before:=Sheets(1)
ActiveSheet.Name = "S"
Range("I3:AO50").Select
Selection.SpecialCells(xlCellTypeVisible).ClearContents
Selection.Interior.Color = xlColorIndexNone
Range("BB3:BD50").ClearContents
ActiveSheet.Range("I2").Value = ActiveSheet(Index - 1).Range("I2").Value + 7
End Sub
La ligne en gras est censé en "I2" de la nouvelle feuille récupérer la valeur de "I2" de la feuille précédente + 7
Merci pour votre aide
Je suis débutante et je bute sur un élément qui paraîtra surement très simple, voici ma macro :
Sub Nvlle_Feuille()
Sheets(1).Copy Before:=Sheets(1)
ActiveSheet.Name = "S"
Range("I3:AO50").Select
Selection.SpecialCells(xlCellTypeVisible).ClearContents
Selection.Interior.Color = xlColorIndexNone
Range("BB3:BD50").ClearContents
ActiveSheet.Range("I2").Value = ActiveSheet(Index - 1).Range("I2").Value + 7
End Sub
La ligne en gras est censé en "I2" de la nouvelle feuille récupérer la valeur de "I2" de la feuille précédente + 7
Merci pour votre aide