XL 2013 Définir deux cellules à une variable avec Dim as String

[badraaliou4]

Merci de votre aide
ça ne prend pas la valeur de la deuxième colonne. D11

Sub retrait()
    Dim lig1 As String
'trouver les informations du contenu
    lig1 = Worksheets("menubureau").Range("C11,d11").Value 'ça ne TROUVE que la valeur de la cellule c11

 

[fanfan38]

Bonjour
Que veux tu faire exactement
si c11="Essai" et D11="Moi" lig1=EssaiMoi?
A+ François

 

[Jacky67]

Re..
Puisque tu insistes après avoir eu une vingtaine de réponses dans le post précédent, une dernière

Sub SEL()
    Dim lig1 As Boolean
    lig1 = Application.CountA([D9:E9]) = 2
    If lig1 Then
        MsgBox "Exécution de la macro"
    Else
        MsgBox "N'exécute pas la macro"
    End If
End Sub