MACRO VBA - Excell 2013

Résolu
nooby01 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   -  
nooby01 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour les ami(e)s, je suis un noob comme mon pseudo le signifie ^^
Néanmoins auriez vous la gentillesse de pouvoir m'aider s'il vous plait...

J'ai excell 2013 et sur la première page qui s'appelle "ACCEUIL"
(mué je sais il y a une faute mdr mais je n'y peux rien ptdr)

Dans la cellule B2 j'ai une macro qui m'indique le jour et l'heure en la rafraîchissant chaque seconde.

Dans la cellule C2 j'indique un temps restant genre 03:12 (pour 3h12)
Dans la cellule D2 (RAZ à :) j'ai la formule B2 + C2

Dans la cellule E2 je rentre des chiffres bien déterminés (1-2-3-4-8-9-10-16 uniquement)

j'ai un tableau J6:K13
dans J6 j'ai la valeur 1
J7 j'ai 2
J8 j'ai 3
J9 j'ai 4
J10 j'ai 8
J11 j'ai 9
J12 j'ai 10
J13 j'ai 16

J'ai également un bouton "Valider"

Voilà pour la présentation...

Viens le problème ... :p mdr

En fonction de ce que je rentre en E2...
Puis en cliquant sur le bouton "valider"
J'aimerai que la macro associée au bouton "valider", me sélectionne la cellule :

K6 si la cellule E2 = 1
K7 si la cellule E2 = 2
K8 si la cellule E2 = 3
K9 si la cellule E2 = 4
K10 si la cellule E2 = 8
K11 si la cellule E2 = 9
K12 si la cellule E2 = 10
K13 si la cellule E2 = 16

Je pensai solutionner mon problème avec un "IF" et un "RECHERCHEV"
Que nenni ... ca ne marche pas... grrrrr mdr

quelqu'un pourrait il m'aider s'il vous plait ?.
par avance merci pour tout , meme de votre soutien si comme moi, vous ne savez pas mdr

Signé : nooby ^^
A voir également:

2 réponses

Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Pouvez-vous mettre une copie de la macro en cellule [B2] et celle du bouton [Valider]?

Salutations.
Le Pingou
0
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

A priori, la macro devrait se résumer à
Sub Valider()
Range("J6:J13").Find(Range("E2").Value, , xlValues, xlWhole).Offset(0, 1).Select
End Sub


A+
0
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Et merci, sauf que le demandeur n'est pas au rendez-vous...!
Salutations.
Le Pingou
0
nooby01 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention  
 
Merci Gyrus ca marche niquel
0