Ne sais plus quoi faire
T
Bonsoir,
Sur un de mes projets, j’ai ce but de code qui m’affiche sur une combobox les pages existantes sur le classeur a partir de la page 4, sur mon ordinateur ca marche bien et sur celui de ma femme ca ne marche pas ça me marque un problème sur « For I » , quelqu’un a une idée le pourquoi, ou même une autre façon de faire pour obtenir le même résultat ??
Merci
Private Sub UserForm_Initialize()
' para listar as folhas do classeur a partir da nona folha
Dim temp()
For I = 4 To Sheets.Count
ReDim Preserve temp(4 To I)
temp(I) = Sheets(I).Name
Next I
Me.ComboBox1.List = temp
Me.ComboBox1.ListIndex = 0
End Sub
Salut le forum
Sans trop savoir l'erreur retournée, ajoute ceci
Dim I as byteMytå
T
Merci Mytå, mais doit inséré ça où stp !
Re le forum
Dans la macro
Dim temp()
Dim I as byte
For I = 4 To Sheets.CountMytå