Modifier un code pour affecter une valeur aux cellules d'un fichier qui reste fermé

BChaly

XLDnaute Occasionnel
Bonsoir à tous,

Avec le code suivant je vais chercher dans un fichier "Base", les cellules qui contiennent une valeur.
Dans un fichier "Reception" une valeur "ABC" est affectée aux cellules qui répondent à la condition.

Comment puis-je modifier le code pour que l'opération se fasse dans le sens contraire. C'est à dire
pour que le fichier "Base" affecte une valeur "ABC" aux cellules du fichier "Reception" si la condition
est remplie. Ce fichier "Reception" resterait fermé.

D'ailleurs est-ce possible?

Merci pour votre aide.

Cordialement,

BChaly

Code:
Sub Test()
Dim Sh As Worksheet
For Each Sh In Worksheets
    With Sh.Range("C3:G20")
        .Formula = "=IF(ISBLANK('F:\[Base.xls]" & Sh.Name & "'!RC),"""",""ABC"")"
        .Value = .Value
    End With
     With Sh.Range("C23:G30")
        .Formula = "=IF(ISBLANK('F:\[Base.xls]" & Sh.Name & "'!RC),"""",""ABC"")"
        .Value = .Value
    End With
Next
End Sub
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
314 499
Messages
2 110 247
Membres
110 711
dernier inscrit
chmessi