Dans un formulaire, dans un =E9l=E9ment SpreadSheet, comment=20
faire par exemple pour qu'une saisie en A1 dans ce=20
SpreadSheet se reporte en C1 de la feuille1 d'excel ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Alain CROS
Bonjour
Dans le module du UserForm
Private Sub Spreadsheet1_SheetChange(ByVal Sh As OWC10.Worksheet, ByVal Target As OWC10.Range) If Target.Address <> Sh.Range("A1").Address Then Exit Sub Feuil1.[C1] = Sh.[A1] End Sub
Alain CROS
"DENIS" a écrit dans le message de news: 1cca601c422c1$eefc9660$ Bonjour à tous,
Dans un formulaire, dans un élément SpreadSheet, comment faire par exemple pour qu'une saisie en A1 dans ce SpreadSheet se reporte en C1 de la feuille1 d'excel ?
Merci
Bonjour
Dans le module du UserForm
Private Sub Spreadsheet1_SheetChange(ByVal Sh As OWC10.Worksheet, ByVal Target As OWC10.Range)
If Target.Address <> Sh.Range("A1").Address Then Exit Sub
Feuil1.[C1] = Sh.[A1]
End Sub
Alain CROS
"DENIS" <anonymous@discussions.microsoft.com> a écrit dans le message de news: 1cca601c422c1$eefc9660$a501280a@phx.gbl...
Bonjour à tous,
Dans un formulaire, dans un élément SpreadSheet, comment
faire par exemple pour qu'une saisie en A1 dans ce
SpreadSheet se reporte en C1 de la feuille1 d'excel ?
Private Sub Spreadsheet1_SheetChange(ByVal Sh As OWC10.Worksheet, ByVal Target As OWC10.Range) If Target.Address <> Sh.Range("A1").Address Then Exit Sub Feuil1.[C1] = Sh.[A1] End Sub
Alain CROS
"DENIS" a écrit dans le message de news: 1cca601c422c1$eefc9660$ Bonjour à tous,
Dans un formulaire, dans un élément SpreadSheet, comment faire par exemple pour qu'une saisie en A1 dans ce SpreadSheet se reporte en C1 de la feuille1 d'excel ?
