Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…