[VBA-E]Récupérer position cellule

Salut la communauté,

Je suis face à un problème :D
Dans une ligne spécifique je veux retrouver l'adresse d'une cellule (seulement la Colonne) contenant une date précise D.

Et dans un second temps, je veux récupérer l'adresse de la cellule contenant la date la plus récente (sur cette même ligne)

Si quelqu'un a une idée, faites moi signe :wink:

PS: je veux la colonne au format LETTRE pas au format Chiffre.

Partons du principe que tu sais retrouver la cellule contenant ta date.
Si tu fais

Code:

---

MaCellule.Address

---

, tu obtiendras quelquechose que tu pourras retraiter pour extraire la(es) lettre(s) de la colonne.

Justement je ne sais pas récupérer l'adresse de la cellule voulue.
Tout ce que je sais, c'est que cette cellule se trouve obligatoirement sur une ligne L.

Maintenant si je connais la ligne et la colonne (en chiffre).

Comment puis je sélectionner de cette cellule jusqu'a une autre dont je connais la ligne.

Ex: ma cellule se trouve en Ligne 7, Colonne 29
Je veux aller jusqu'a Ligne 1220, Colonne 29

Comment faire ?
Etant débutant VB (vive le C++)

coucou,

Code:

---

Range(Cells(7, 29), Cells(1220, 29)).Select

---

voilà :D

Citation:

---

Envoyé par Elstak

coucou,

Code:

---

Range(Cells(7, 29), Cells(1220, 29)).Select

---

voilà :D

---

Comme quoi lorsque c'est facile on a des réponses :roll:

je blague je vais tester ça merci :wink:

Et tu veux vraiment sélectionner cette zone, ou bien est-ce que tu veux faire un traitement sur ces cellules, ou les valeurs contenues dans ces cellules?

Sélectionner pour Copier/Collage Spécial par Valeur :D

Salut, il ne me manque plus qu'a connaitre la fonction qui permet de sélectionner une colonne (entière).

Ex: sélection de la colonne 10
merci à vous.

PS: ensuite ce topic aura le tag RESOLU :wink:

Ah !
Je commence à y voir clair !
Tu es le copain de ou tu es LiquidNitrogen ? :idea:

Citation:

---

Envoyé par jmfmarques

Ah !
Je commence à y voir clair !
Tu es le copain de ou tu es LiquidNitrogen ? :idea:

---

Rien à voir désolé...
C'est la 1ère fois que je viens sur le topic VBA, d'habitude j'interviens sur C++ ou C#

Code:

---

Columns(10).Select

---

Ça doit marcher, ça.

Ca marche mais j'ai un soucis ici

Code:

---

Range(Cells(7, Colonne)).FormulaR1C1 = "=DATE(YEAR(RC[-1]),MONTH(RC[-1])+1,DAY(RC[-1]))"

---

Quelqu'un peut me dire ce qu'il ne va pas ?
Je calcule la date en fonction de celle de la colonne C-1

C'est bon j'ai enlevé le RANGE

merci a ceux qui m'ont aidé.
Enfin terminé ce fichier excel

Bon courage a ceux qui font que ça :P

Une dernière question avant de disparaître de cette rubrique.

Comment peut on protéger nos macros ?
Que personne puisse les modifier (excepté moi).

Outils, Propriétés de VBAProject... Onglet "Protection" !
:D

Citation:

---

Envoyé par Megaxel

Outils, Propriétés de VBAProject... Onglet "Protection" !
:D

---

J'ai vu cette proprété, mais ça n'empêche pas de voir et ou modifier la macro.

Bon ça fonctionne.

mais fallait fermer et réouvrir le fichier excel (c'est con, mais c'est comme ça)

Merci en tout cas, et à la prochaine :coucou:

Une dernière question sur Excel.

J'essaye d'appliquer un filtre automatique comme ceci

Code:

---

1 2	Cells(7, 1).Select Selection.AutoFilter Field:=3, Criteria1:="<>0", Operator:=xlAnd

---

Mais ça n'a pas l'air de fonctionner.

Field n°3 correspond bien à un filtre personnalisé.
Ce champ (Cells(7,1)) contient des références de machine.

Je veux afficher seulement les références non nulles

Je me suis planté :ange:

Code:

---

Selection.AutoFilter Field:=1, Criteria1:="<>0", Operator:=xlAnd

---

Et ça fonctionne