flo2002
XLDnaute Impliqué
Bonjour à tous!
j'ai encore un petit soucis ce matin sur des fichiers de conso!
j'ai fais une macro qui doit definir un code mais selon deux conditions, et je crois que la est la faille:
Dim X As Range
Dim derlign As Long
derlign = Range("D65536").End(xlUp).Row
For Each X In Range(Cells(14, 4), Cells(derlign, 4))
If X.Offset(0, -2).Value Is Not Error Then
If X.Value Is Error Then
X.Value = X.Offset(0, 2).Value & X.Offset(0, -2).Value
End If
End If
Next X
merci de vos lumieres
de plus autres petit soucis.
Mon fichier après conso pese trop lourd (pres de 60mo). Mais j'ai plein de formule. Ne devrais je pas passer tout ca en valeur?
Sinon comment fait on dans une sub pour "vider" le presse papier?
Merci d'avance pour toutes reponses
j'ai encore un petit soucis ce matin sur des fichiers de conso!
j'ai fais une macro qui doit definir un code mais selon deux conditions, et je crois que la est la faille:
Dim X As Range
Dim derlign As Long
derlign = Range("D65536").End(xlUp).Row
For Each X In Range(Cells(14, 4), Cells(derlign, 4))
If X.Offset(0, -2).Value Is Not Error Then
If X.Value Is Error Then
X.Value = X.Offset(0, 2).Value & X.Offset(0, -2).Value
End If
End If
Next X
merci de vos lumieres
de plus autres petit soucis.
Mon fichier après conso pese trop lourd (pres de 60mo). Mais j'ai plein de formule. Ne devrais je pas passer tout ca en valeur?
Sinon comment fait on dans une sub pour "vider" le presse papier?
Merci d'avance pour toutes reponses