Bonjour,

j'ai un problème dont je ne trouve pas le moindre indice de solution
j'ai dans Thisworkbook d'un classeur le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Workbook_Open()
 
Dim client As Variant, derClient As Integer, infos As Variant
 
Set client = Sheets("Clients")
Set infos = Sheets("Infos")
 
With Cells(Rows.Count, "A").End(xlUp).MergeArea: derClient = .Cells(.Cells.Count).Row: End With
 
client.Range("F2:F" & derClient).Value = client.Range("A2:A" & derClient).Value
 
infos.Select
infos.Activate
 
End Sub
à l'open du fichier la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
client.Range("F2:F" & derClient).Value = client.Range("A2:A" & derClient).Value
ne donne pas de résultat en colonne F

par contre en pas à pas ce même code renseigne la colonne F

J'ai cherché das tous les sens, je ne comprends vraiment pas, cela vient surement d'un effet de bord de qq chose ?