Discussion :

[delamarque]

Bonjour tout le monde,

j'ai crée un spreadsheet sur un UF et lorsque je clique sur une cellule je voudrais avoir une variable dans ma procédure qui m'indique le numéro de la ligne sur laquelle j'ai cliqué.

J'ai commencé en faisant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub spreadsheet_Click()
 
Dim ligne as integer
 
ligne = Photos_accéléros.spreadsheet.Application.ActiveCell
 
End sub

Le pb c'est qu'il me retourne ce qu'il y a dans la cellule et non le numéro de ligne

Merci pour votre temps

[SilkyRoad]

bonjour

tu peux tester

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Spreadsheet1_Click(ByVal EventInfo As OWC.SpreadsheetEventInfo)
MsgBox EventInfo.Range.Row
End Sub

bon wee kend
michel

[delamarque]

j'ai un message d'erreur de compilation qui me dit que le type utilisé par l'utilisateur n'est pas défini.

[SilkyRoad]

rebonsoir

quelles versions d'OWC/Spreadsheet et d'Excel utilises tu ?


bonne soiree
michel

[delamarque]

pour Excel c'est 2002 , OWC je sais pas ce que c'est...

[delamarque]

j'ai crée le spreadsheet à partir de mon fichier Excel donc cela devrait être logiquement 2002 également

[SilkyRoad]

rebonsoir

OWC : Microsoft Office Web Components , qui permet d'utiliser les objets ChartSpace , Spreadsheet , PivotTable , DataSource

je ne sais pas quoi te dire puisque chez moi cela fonctionne bien et je n'arrive pas à reproduire ton message d'erreur


je doute que ce soit ça mais tu peux tester

dans l'editeur de macros
Menu Outils
references
Assure toi que la ligne "Microsoft Office Web Components x.x" est cochée
Clique sur OK pour valider
( x.x dépend de ta version d'Office )


bonne soirée
michel

[ThierryAIM]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Spreadsheet1_Click()
    MsgBox "ligne : " & Spreadsheet1.ActiveCell.Row & vbCrLf _
        & "colonne : " & Spreadsheet1.ActiveCell.Column
End Sub

[delamarque]

Merci les gars je viens de voir votre message.
je vais essayer comme ca