Bonjour, j'ai eu la mauvaise idée de vouloir faire ménage sur mon disque dur et j'ai désinstallé office XP vu qu je suis passé à office 2010 depuis quelque temps.
Manque de bol, une des macros que j'utilise régulièrement ne fonctionne plus.
J'ai le message écrit dans le sujet qui apparaît lorsque je la lance.
Je vous met en copie la partie mise en surbrillance:
'recopie la ligne de "transfert" vers "année d'archive" en incrémentant d'une ligne à chaque opération'
Sheets("Transfert").Select
Rows("1:1").Select
Selection.Copy
Dim caisse
c = 0
Sheets("encours").Select
Selection1 = Range("A1:A100")
For Each caisse In Selection1
If caisse = VIDE Then
Rows(1 + c).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Exit For
End If
c = c + 1
Next caisse
Range("A2").Select
Sheets("Transfert").Select
Application.CutCopyMode = False
Sheets("Stock").Select
ActiveWorkbook.Save
End Sub
N’étant pas du tout familier du code VBA , je suis un peu perdu.
Merci d'avance pour votre aide .