Dim maplage As Range Column = 3 Set maplage = Range("A1:B100") Cells(1, 10) = "fff" toto = "MAX((" & maplage.Address & "=""fff"")*column(" & maplage.Address & "))" titi = "MAX((" & maplage.Address & "= Cells(1, 10).Value ) * Column(" & maplage.Address & "))" MsgBox toto & vbCrLf & titi
Dim maplage As Range Column = 3 Set maplage = Range("A1:B100") Cells(1, 10) = "fff" toto = "MAX((" & maplage.Address & "=""fff"")*column(" & maplage.Address & "))" titi = "MAX((" & maplage.Address & "= Cells(1, 10).Value ) * Column(" & maplage.Address & "))" MsgBox toto & vbCrLf & titi
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionLa ligne suivante fonctionne :
xyz = Evaluate("MAX((" & maplage.Address & "=""fff"")*column(" & maplage.Address & "))")
Dim maplage As Range Column = 3 Set maplage = Range("A1:B100") Cells(1, 10) = "fff" toto = "MAX((" & maplage.Address & "=""fff"")*column(" & maplage.Address & "))" titi = "MAX((" & maplage.Address & "=""" & Cells(1, 10).Value & """)*Column(" & maplage.Address & "))" MsgBox toto & vbCrLf & titi