Fenetre sur excel VBA
Résolu
alexmilano
-
alexmilano -
alexmilano -
bonjour
je suis sur excel et je fais une programmation avec visual basic ...
j'aimerais ke la fenetre d'une liste déroulante rest toujours a la meme place sur l'écran
ou
que cette meme fenetre, se déplace, selon la cellule sur laquelle je me trouve
(pour linstan, ke je sois a la ligne 20 ou 1510 cette fenetre reste toujours en haut de page
a l'aide !
je suis sur excel et je fais une programmation avec visual basic ...
j'aimerais ke la fenetre d'une liste déroulante rest toujours a la meme place sur l'écran
ou
que cette meme fenetre, se déplace, selon la cellule sur laquelle je me trouve
(pour linstan, ke je sois a la ligne 20 ou 1510 cette fenetre reste toujours en haut de page
a l'aide !
A voir également:
- Fenetre sur excel VBA
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Comment trier par ordre alphabétique sur excel - Guide
- Comment calculer la moyenne sur excel - Guide
- Déplacer colonne excel - Guide
2 réponses
Bonjour,
Le plus simple est de figer les volets sous ta liste.
Si c'est pour restreindre la saisie à qcq valeurs tu peux utiliser "Données/Validation..." et "autoriser: liste". Selectionner avant toutes les cellules où ce contrôle doit avoir lieu. Une liste se déroulera lors de la sélection de ces cellules.
Sinon en VBA tu peux gerer la position de ta liste avec les propriétés .top et .left mais là ça dépend de l'affichage de ta feuille et c'est plutot coton...
cdt
Le plus simple est de figer les volets sous ta liste.
Si c'est pour restreindre la saisie à qcq valeurs tu peux utiliser "Données/Validation..." et "autoriser: liste". Selectionner avant toutes les cellules où ce contrôle doit avoir lieu. Une liste se déroulera lors de la sélection de ces cellules.
Sinon en VBA tu peux gerer la position de ta liste avec les propriétés .top et .left mais là ça dépend de l'affichage de ta feuille et c'est plutot coton...
cdt
au fait c'est bon j'ai trouvé mais merci quand meme de ton aide, voici ce que j'ai fait, pour l'affichage de ma liste ... ( en gras ce que j'ai rajouté ... ;) )
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Double
Dim t As Double
lstarticle.Visible = False
If Target.Column = 1 And Target.Row >= 14 Then
Cancel = True
r = Target.Row
For i = 1 To r - 1
t = t + Rows(i).Height
Next
lstarticle.Top = t
lstarticle.Visible = True
End If
End Sub
a+ bonne continuation
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Double
Dim t As Double
lstarticle.Visible = False
If Target.Column = 1 And Target.Row >= 14 Then
Cancel = True
r = Target.Row
For i = 1 To r - 1
t = t + Rows(i).Height
Next
lstarticle.Top = t
lstarticle.Visible = True
End If
End Sub
a+ bonne continuation