VBA avec recherche v

VBA avec recherche v - VB/VBA/VBS - Programmation

Marsh Posté le 20-05-2015 à 09:14:29    

Bonjour à tous.
A mon stage j'ai un travail à faire sur un excel mais je ne m'y connais pas du tout en macro/VBA donc j'aimerai bien savoir si c'est possible.  
En fait j'ai une colonne avec des cellules remplis et d'autres vides, et je voudrais "remplir" les vides avec une valeur que je trouverai via une fonction recherche v. C'est possible ?
Merci de vos réponses !

Reply

Marsh Posté le 20-05-2015 à 09:14:29   

Reply

Marsh Posté le 20-05-2015 à 12:05:16    

Recherchev (ou vlookup en anglais) n'est pas une fonction vba.
 
Une solution, si tu veux qu'une fois la case remplie, elle reste synchronisée avec l'autre tableau, serait de faire quelque chose comme:

Code :
  1. range.formula = "=vlookup(.....)"


En VBA "pur"
si tu veux copier la valeur d'une cellule en recherchant une valeur ailleur il faut plutot faire quelque chose du genre :

Code :
  1. set r = range
  2. set r = r.find(...parametres...)
  3. if not r is nothing then
  4. result = r.cells(...décalages...).value
  5. end if


 
Je ne sais pas si tu à l'habitude de chercher comment utiliser les fonction:  
Pour find, je chercherais "range.find msdn"  
Le Microsoft Dev Network est plutôt pas trop mal foutu avec parfois des exemples.
 
Bon courage


---------------
il s'appel le ronge me doute
Reply

Marsh Posté le 20-05-2015 à 18:13:25    

 
           Bonjour,
 
           la fonction RECHERCHEV peut aussi s'utiliser directement en VBA soit via  Evaluate  soit via  Application.Vlookup  …
  

Reply

Marsh Posté le 20-05-2015 à 19:30:28    

Dans mon Excel 2010, je ne vois pas de "application.vlookup" c'est un ajout dans 2013?
 
(et perso, je n'aime pas evaluate)


---------------
il s'appel le ronge me doute
Reply

Marsh Posté le 22-05-2015 à 09:05:04    

 
           Ce n'est pas nouveau car cela date d'avant Excel 2003, pour compatibilité avec d'encore plus anciennes versions !
 
           Toute fonction pouvant être utilisée via  WorksheetFunction  passe aussi directement par  Application  …
 
           Et c'est tant mieux car combinée avec la fonction  IsError  (et au besoin une variable Variant)
           pas besoin de gestion d'erreur !
 
           Quant à Evaluate, c'est pourtant une puissante fonction pouvant rendre de nombreux services et évitant les usines à gaz …
 

Reply

Marsh Posté le 02-06-2015 à 17:22:21    

Tu peux pas juste faire un filtre sur tes cellules vides?

Reply

Marsh Posté le 04-06-2015 à 07:44:43    

ou faire un petit =nb.si

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed