Transformer une adresse .address en range
Résolu/Fermé
phileas25
Messages postés
6
Date d'inscription
vendredi 11 mars 2016
Statut
Membre
Dernière intervention
11 octobre 2016
-
29 mars 2016 à 16:07
phileas25 Messages postés 6 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 11 octobre 2016 - 30 mars 2016 à 16:13
phileas25 Messages postés 6 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 11 octobre 2016 - 30 mars 2016 à 16:13
A voir également:
- Transformer une adresse .address en range
- Créer une adresse mail - Guide
- Nom de l'adresse ✓ - Forum Internet / Réseaux sociaux
- Tirexo nouvelle adresse - Guide
- Votre colis est dans le site de livraison qui dessert votre adresse. nous le préparons pour le mettre en livraison. ✓ - Forum Consommation et internet
- Localiser une adresse ip - Guide
2 réponses
cs_Le Pivert
Messages postés
7883
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
724
29 mars 2016 à 17:12
29 mars 2016 à 17:12
Bonjour,
Comme ceci:
Comme ceci:
Dim position As String
position = Replace("$b$4", "$", "")
Range(position).Interior.Color = 65535
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
15 mars 2023
2 712
30 mars 2016 à 08:37
30 mars 2016 à 08:37
Bonjour,
j'ai obtenu l'adresse d'une cellule avec la fonction find
Dans ce cas, pourquoi chercher l'adresse de la cellule plutôt que la cellule elle même?
Find renvoie un objet Range, ça tombe plutôt bien...
Regarde ceci :
j'ai obtenu l'adresse d'une cellule avec la fonction find
Dans ce cas, pourquoi chercher l'adresse de la cellule plutôt que la cellule elle même?
Find renvoie un objet Range, ça tombe plutôt bien...
Regarde ceci :
Sub test()
Dim maVal As String, monRange As Range
maVal = "toto"
Set monRange = Sheets("Feuil1").Columns(2).Cells.Find(maVal)
If Not monRange Is Nothing Then
'ici tu fais ton offset, par exemple :
monRange.Offset(0, 2) = "titi"
Else
MsgBox "Pas trouvé " & maVal & " en colonne B Feuil1"
End If
End Sub
phileas25
Messages postés
6
Date d'inscription
vendredi 11 mars 2016
Statut
Membre
Dernière intervention
11 octobre 2016
30 mars 2016 à 16:13
30 mars 2016 à 16:13
Merci beaucoup pijaku, c'est exactement ce que je cherchais
30 mars 2016 à 16:12