Copier valeur textbox sur certaines lignes d'un classeur

Black Matou

XLDnaute Nouveau
Bonjour,

Je vais essayer d'être clair mais ne vous inquiétez pas, j'ai joint un fichier qui devrait aider à la compréhension :cool:

En gros, sur le fichier ci-joint j'ai chaque jour (ouvré) un certain nombre de valeur à enregistrer dans plusieurs colonnes, dans plusieurs onglets, à date spécifique. Pour centraliser le tout j'ai créer un userform (en feuil1) qui me permet sur une seule fenêtre de rentrer toutes mes valeurs puis en validant, que ça m'écrive ça là où il le faut

Pour ce qui est de copier/coller une valeur d'une textbox dans une cellule, ça pas de problème. Par contre je sèche au moment où je doit mettre la condition que ça doit écrire sur une ligne bien spécifique qui change chaque jour (et j'ai parfois besoins de revenir à une date antérieur).

Si vous pouviez m'indiquer le code à utiliser pour une textbox, après je saurais l'adapter pour toutes les textbox.
 

Pièces jointes

  • Classeur.xlsm
    25 KB · Affichages: 39
  • Classeur.xlsm
    25 KB · Affichages: 32

Iznogood1

XLDnaute Impliqué
Re : Copier valeur textbox sur certaines lignes d'un classeur

Bonjour

Un bout de code qui t'indiquera la ligne à modifier si la date existe déjà en Feuil2.

VB:
  Dim rLigneFeuil2 As Range
  
  Set rLigneFeuil2 = Feuil2.[A:A].Find(CDate(Me.TextBox29.Value))
  If rLigneFeuil2 Is Nothing Then
    MsgBox "Nouvelle date"
  Else
    MsgBox "Date présente ligne " & rLigneFeuil2.Row
  End If
 

Discussions similaires

Statistiques des forums

Discussions
311 711
Messages
2 081 792
Membres
101 817
dernier inscrit
carvajal