Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Désignation de cellule

  • Initiateur de la discussion Initiateur de la discussion PierYves
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

PierYves

Guest
Bonjour,
j'aimerais savoir comment nommé une cellule ds VBA en se référant à la cellule active. en fait je souhaiterais donner une valeur à des cellules adjacente de ma cellule active. Les cellules étant toutes sur la même ligne.
merci d'avance.
 
Re : Désignation de cellule

Bonjour PierYves,

par exemple

Code:
Activecell.offset(0,1).value = "toto"

mettra toto dans la cellule à droite de la cellule active

Code:
Activecell.offset(0,-1).value = "titi"

mettra titi dans la cellule à gauche de la cellule active
 
Re : Désignation de cellule

Re,

toutes les fonctions Excel ne sont pas directement disponibles en VBA

par exemple, si tu veux faire une fonction MAX

Code:
Application.WorksheetFunction.Max(Range("A1:A10"))

Attention, ce sont les noms anglais des fonctions en VBA

mais pour celles non disponibles, il y a des possibilités en utilisant Evaluate
 
Re : Désignation de cellule

En fait j'aimerais traduire la fonction excel recherchev,
j'ai essayé ça :

ActiveCell.Offset(0, -1).Value = Application.WorksheetFunction.Recherchev(Activecell;Coffragevoile!$B$3:$E$65536;4;0)

mais ça ne passe pas. En fait j'ai peur de ne pas pouvoir faire appel directement à mes onglets de classeur depuis VBA. J'essaye trop de copier coller ma fonction excel ds VBA je pense. mais je sais pas du tout comment faire autrmeent.
Merci beaucoup en tout cas pour ton aide trés précieuse !
 
Re : Désignation de cellule

Bonjour PierYves,

Attention, ce sont les noms anglais des fonctions en VBA

à tester

Code:
ActiveCell.Offset(0, -1).Value = Application.WorksheetFunction.vlookup(Activecell.value,sheets("Coffragevoile").range("$B$3:$E$65536"),4,0)

attention, si la recherchev ne trouve pas, le code plante
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
3
Affichages
255
Réponses
4
Affichages
310
W
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…