If d'un range
Bonjour,
Je ne sais pas comment écrire ceci : si le range de mon objet est différent que 5 , replacer le range.
Set objet = Application.InputBox("Choisir 5 cellules ou placer l'objet", "objet", Type:=8)
'If Range(porte_avion) <> 5 then
'end if
If porte_avion.Range <> 5 Then
End If
Je ne sais pas comment écrire ceci : si le range de mon objet est différent que 5 , replacer le range.
Set objet = Application.InputBox("Choisir 5 cellules ou placer l'objet", "objet", Type:=8)
'If Range(porte_avion) <> 5 then
'end if
If porte_avion.Range <> 5 Then
End If
2 réponses
-
ContributeurBonjour,
un range a beaucoup de propriétés et de méthodes.
Ce que tu demandes n'a pas de sens actuellement, sois plus précis en utilisant des mots plutôt qu'un vocabulaire que tu maîtrises mal.
eric
-
ContributeurSalut le Forum
Tu peux améliorer ceciDim objet As Range Set objet = Application.InputBox("Choisir 5 cellules ou placer l'objet", "objet", Type:=8) If objet.Cells.Count <> 5 Then MsgBox "Problème"
Mytå
