Discussion :

[Jean-Philippe44]

Bonjour,

je cherche a trouver la cellule selectionée dans une feuille OWC mais ca marche pas....

Code :

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

1
2
3
4
5
6
7
Private Sub Spreadsheet1_DblClick()
 
Dim NumR, NumC As Variant
Dim target As Range
 
NumR = target.Spreadsheet1.Row
NumC = target.Spreadsheet1.Column

[Invité]

Me.Spreadsheet1.ActiveSheet.activecell.row

[Jean-Philippe44]

merci mais ca marche pas non plus.

ActiveCell ne passe pas....

Spreadsheet1 est une feuille OWC qui est dans un Userform

[Jean-Philippe44]

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub Spreadsheet1_Click()
 
Dim NumR, NumC As Variant
 
Set wksOwc = Userform2.Spreadsheet1
 
NumR = wksOwc.ActiveCell.Row
NumC = wksOwc.ActiveCell.Column

[kiki29]

Salut, à titre d'infos : Utiliser les contrôles dans un UserForm, en VBA Excel et Utilisation de l'objet OWC PivotTable dans un UserForm Excel