Contenu récent par WG95

Auriez-vous une idée ou une piste de réflexion svp ?

Ci dessous le code actuel Private Sub UserForm_Initialize() Dim ws As Worksheet Dim i As Long Dim j As Long Dim a As Long ListBox1.ColumnWidths = "20;50;80;80;50;50;50;50;30;30;80;0;0;0;0;0;0;50;0;0;50;0;0;0;0;50;0;0;0;0;0;0;0;0;0;0" ListBox1.ColumnCount = 27 ListBox1.Clear j...

J'ai modifié les Dim ainsi : Dim ws As Worksheet Dim i As Long Dim j As Long Dim a As Long Dorénavant cela indique l'erreur suivante : "Erreur de compilation Tableau attendu" Et UBound est surligné.

Bonjour, Merci encore pour ton temps. Ca me mets "Erreur d'éxecution '380': Valeur de propriété incorrecte". Pourtant la première ligne s'ajoute à la listbox : " a , Beauchamp , gare " Par ailleurs, pourrais tu m'expliquer le code " .List(j, 0) = (a(i, 1)) " s'il te plait ? Notamment...

Bonjour, Merci pour ton intérêt et ton temps. Ci-joint le fichier. Les tests de macro se trouve dans l'onglet INTERFACE. l'onglet Synthèse devait servir pour la solution 3 évoquée ci-dessus. Les onglets "base" servent à la création des villes et quartiers.

Bonjour, Je me permets de venir demander de l’aide car je bloque complètement sur un code. D’habitude j’arrive à me dépatouiller en fouillant les forums mais la c’est visiblement trop complexe pour un débutant comme moi. Voilà l’idée : J’ai un classeur regroupant plusieurs onglets : - des...