N
niepce26
Guest
Bonjour à tous,
J'ai actuellement un USF avec des textbox dans lesquels s'affichent des données provenant d'une feuille excel ("Données").
Je souhaite importer (dans d'autres txtbox) des données provenant d'une autre feuille excel ("Taille"), feuille se trouvant dans le même classeur.
Voici le code que j'ai:
Private Sub AfficherZones(lgLig As Long)
' Afficher le contenu des zones
With Worksheets("Données")
Newdevis.Caption = "Consultation Devis"
cmdvalid.Caption = "Modifier"
cmdvalid.Locked = False
txtcommentairetailleelagage.Value = .Range("F" & lgLig).Value
txtcommentairedebroussaillagetonte.Value = .Range("G" & lgLig).Value
txtcommentaireplantation.Value = .Range("H" & lgLig).Value
txtcommentairelocationmiseendecharge.Value = .Range("I" & lgLig).Value
End Sub
End With
Merci par avance de vos réponses, bonne journée....
Niepce26
J'ai actuellement un USF avec des textbox dans lesquels s'affichent des données provenant d'une feuille excel ("Données").
Je souhaite importer (dans d'autres txtbox) des données provenant d'une autre feuille excel ("Taille"), feuille se trouvant dans le même classeur.
Voici le code que j'ai:
Private Sub AfficherZones(lgLig As Long)
' Afficher le contenu des zones
With Worksheets("Données")
Newdevis.Caption = "Consultation Devis"
cmdvalid.Caption = "Modifier"
cmdvalid.Locked = False
txtcommentairetailleelagage.Value = .Range("F" & lgLig).Value
txtcommentairedebroussaillagetonte.Value = .Range("G" & lgLig).Value
txtcommentaireplantation.Value = .Range("H" & lgLig).Value
txtcommentairelocationmiseendecharge.Value = .Range("I" & lgLig).Value
End Sub
End With
Merci par avance de vos réponses, bonne journée....
Niepce26