Afficher une feuille de calcul dans un userform | ||
---|---|---|
Inscription: 05/10/2008
Messages:
24
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 18-10-2008 10h47
Bonjour, est il possible avec un lien hypertext ou autre d'afficher dans la feuille active une lucarne ou une fenetre visant une partie d'une autre feuille dans laquelle on peut ce deplacer ?? je ne sais pas si c'est tres clair mais bon je post quand meme d'avance merci
ps:un peut comme si on ouvrait un userform dans lequelle il y aurait une autre feuille avec les ascensseurs |
|
|
Re: difficulté pour adapter un code vba | ||
---|---|---|
Inscription: 05/10/2008
Messages:
24
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 07-10-2008 15h14
Bonjour myDearFriend, merci pour ces corrections et ta generosité ça fonctionne parfaitement je clos ce fil a bientot
Edité par spookyz le 19/11/2008 17:30:50
|
|
|
Re: difficulté pour adapter un code vba | ||
---|---|---|
Inscription: 05/10/2008
Messages:
24
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 06-10-2008 18h12
Bonjour Monsieur le Webmestre, et merci pour ton aide mais je rencontre presque le meme probleme alors je joind le fichier" Achats"
pour te montrer le probleme si tu a un moment Voila tu pouras voir que sur la "Feuil2" et "Feuil3" les colonnes du userform changes et j'aurai voulu retrouver les colonnes de la feuille "Table" alors si tu vois une solution c'est cool peut tu aussi m'expliquer l'importance des" points"qui precedent" Range" ou "Cells" a bientôt et encore merci
Edité par spookyz le 07/10/2008 15:14:42
|
|
|
difficulté pour adapter un code vba | ||
---|---|---|
Inscription: 05/10/2008
Messages:
24
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 05-10-2008 17h16
Bonjour je ne sais pas comment faire pour lancer ce code depuis un bouton situé sur une autre page que la page des colones de données
avec un bouton sur la meme page pas de problèmes mais si je place le bouton sur une autre page alors cela ne fonctionne pas si une personne peut m'aider c'est cool je place le code ici mais je ne trouve pas les balises qui permetes de placer le code proprement désolé Private Sub ListBox1_Change()
' Mise à jour des items dans la ListBox2
UpdateListBox Me.ListBox2, Me.ListBox1.ListIndex
End Sub
Private Sub UpdateListBox(Parametres As MSForms.ListBox, IndexValue As Integer) Dim LastInputRow As Integer, ColumnIndex As Integer, InputRange As Range
' Les données commencent à la ligne 3
Const FirstInputRow As Integer = 3
' Détermine depuis quelle colonne on prend la liste des items
ColumnIndex = IndexValue + 2
' Détermine la dernière ligne de la colonne sélectionnée et la plage correspondante
LastInputRow = Cells(FirstInputRow, ColumnIndex).End(xlDown).Row
Set InputRange = ActiveSheet.Range(Cells(FirstInputRow, ColumnIndex), Cells(LastInputRow, ColumnIndex))
With Parametres
.ColumnHeads = True ' Affiche les en-têtes de colonne
.RowSource = InputRange.Address ' Spécifie la source de données
.ListIndex = 0 ' Sélectionne le premier item
End With
Set InputRange = Nothing
End Sub
Private Sub UserForm_Initialize() ' La mise à jour des items dans ListBox1 ...
' mettra à jour les items dans la ListBox2
With Me
UpdateListBox .ListBox1, -1
End With
End Sub
Private Sub CommandButton1_Click() Me.Hide
MsgBox "Dans la catégorie : " & Me.ListBox1.List(Me.ListBox1.ListIndex) & Chr(13) & Chr(13) & _
"Vous avez choisi : " & Me.ListBox2.List(Me.ListBox2.ListIndex), vbInformation, "Résultat de votre choix :"
voila j'espere avoir été clair d'avance merci
Edité par spookyz le 07/10/2008 15:16:52
|
|
|