envoyer des valeur à leurs remplacement (2 variables)

yoker · 22 Mai 2015

Bonjour le Forum, 🙂

j'ai une petite question comme d'habitude 🙂

sur une feuil j'ai un formulaire à remplir qui contien quelque champs, ID, Mois, et le nombre de vente.

La demande est de cliquer sur le bouton valider pour envoyer le nombre de vente sur la page correspendante au mois et devant la personne concernée (ID).

j'espère que j'ai bien expliquer ma demande 🙂

en PJ le mon fichier

Caillou · 22 Mai 2015

Re : envoyer des valeur à leurs remplacement (2 variables)

Bonjour,

essayes ce code derrière ton bouton

Code:

  Dim feu As String, id As String, vent As Integer
  feu = Range("B4")
  id = Range("B2")
  vent = Range("B6")
  
  Sheets(feu).Cells.Find(What:=id, After:=Range("A1")).Offset(O, 1) = vent

Caillou

yoker · 22 Mai 2015

Re : envoyer des valeur à leurs remplacement (2 variables)

Merci bcp Caillou 🙂

envoyer des valeur à leurs remplacement (2 variables)

yoker

XLDnaute Nouveau

Pièces jointes

Caillou

XLDnaute Impliqué

yoker

XLDnaute Nouveau

Discussions similaires

envoyer des valeur à leurs remplacement (2 variables)

yoker

XLDnaute Nouveau

Pièces jointes

Caillou

XLDnaute Impliqué

yoker

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency