selection d'une plage de cellules

[jammy17]

BONSOIR LE FORUM

je rencontre un petit problème:

je voudrais faire apparaitre dans ma listbox une liste de numéro contenue dans une plage de cellule.
le probleme c'est qu'il faut ordonner a la macro de selectionner une plage de cellule comprise entre les mots "IROISE" et "OUESSANT" et HELAS je bloque

si quelqu'un a une solution HIP HIP HIP

d'avance merci.......JAMMY

 

[Staple1600]

Re : selection d'une plage de cellules

Bonsoir


Tu as demandé à Fred, Sandrine et Marcel de t'aider?




🙂p)


Apres l'humour: les questions ; ton fichier doit rester agencé tel quel?

 

[jeanpierre]

Re : selection d'une plage de cellules

Bonsoir jammy17, staple,

Plusieurs posts (beaucoup) ou je remarque que lorsque que l'on a rien à dire, on le fait savoir...

Quelle relation avec Fred, Sandrine et Marcel.. ?

J'essaye de comprendre, ne m'en voulez pas...

 

[Staple1600]

Re : selection d'une plage de cellules

Re


En utilisant Like peut-etre

ex:

x="IROISE"
y="OUESSANT"

If x Like "IRO* And y Like "OUESS*" then
msgbox "ok"
end if

 

[jammy17]

Re : selection d'une plage de cellules

non non le fichier n'est qu'un bout d'essai

je cherche a selectionner toute la plage de cellule, mais ne sait comment faire,

MARCEL? ce sont des bretons ?

j'ai bien peur que la reponse soit plus complexe que ca non?

 

[Staple1600]

Re : selection d'une plage de cellules

Re



Ce n'est qu'une suggestion
Je pensais utilisé Like pour identifier la ligne ou se trouvre la chaine
recherchée puis compter le nombre de lignes jusqu'à la prochaine occurence.

Et effectivement c'est compliqué.



PS: pour le reste, c'était juste un trait d'humour
relatif à une émission de France 3 (fin de l'aparté)

 

[Staple1600]

Re : selection d'une plage de cellules

Re


En testant ceci

....
Set plage = Sheets("avurnav locaux").Range(Cells(1, 1), Cells(65536, 1).End(xlUp))
For Each cel In plage
    'If cel.Offset(0, 1).NumberFormat = "m/d/yyyy" And cel.Offset(0, 0).Value <> "" Then
   If cel Like "OUESS*" Then
        With ListBox1
            .AddItem cel.Offset(2, 0).Value
            .Column(1, i) = cel.Offset(2, 2).Value '
            .Column(2, i) = cel.Offset(2, 3).Value '
        End With
        ListBox2.AddItem cel.Row 'remplissage de la ListBox2
      
        i = i + 1 'redéfinit la variable i
    End If

    Next cel
End Sub

Je récupère dans la listbox la ligne 188
(qui est celle qui contient OUESSANT en partant de la fin)

 

[jeanpierre]

Re : selection d'une plage de cellules

Re

Oki, pour le trait d'humour, moi j'ai pas compris... France 3 et tout le binz, c'est quoi.....

l'occasion une fois encore de ne rien dire.... 5 ou 6 points à l'occase... ?

Pffff.

 

[Cousinhub]

Re : selection d'une plage de cellules

Bonsoir jammy, re- staple, jeanpierre

regarde le fichier joint (Ok, c'est du bricolage, mais ça marche....)
Maintenant, j'ai peur de ce que tu risques de demander.....

 

[Staple1600]

Re : selection d'une plage de cellules

Re

-->bhbh: tu as d'abord récréé la liste sur la feuille à la mano?
(plage H...) et ca c'est pas grâce à VBA 😉


Moi j'ai cru qu'il fallait alimenter la lsitbox avec le fichier brut (en le laissant tel quel)

 

[Cousinhub]

Re : selection d'une plage de cellules

re-,

staple :

-->bhbh: tu as d'abord récréé la liste sur la feuille à la mano?
(plage H...) et ca c'est pas grâce à VBA

Euh, tu as vu le code?

Edit : macro essai()

 

[Staple1600]

Re : selection d'une plage de cellules

Re

Oui j'ai vu le code

Mais comme il se fait tard, je n'ai vu que le code de l'userform

C'est l'emploi du mot bricolage qui m'a perturbé.


Je m'excuse platement .

Tu peux me donner un gage. 🙄 🙄

 

[Cousinhub]

Re : selection d'une plage de cellules

Sans rancune, 😉
maintenant, comme je le disais dans mon post, je suppose qu'il va falloir extraire les données du numéro sélectionné.
Encore du bricolage en perspective... 😀

 

[Staple1600]

Re : selection d'une plage de cellules

Re


Je viens de comprendre ton pseudo

bhbh = bricolagiticus hommo bricolage hop la

En tout ton cas

ton code VBA

me laisse béat

sous les bravas 😀



-->jammy17

non non le fichier n'est qu'un bout d'essai

Donc je suppose qu'on peut agencer les données brutes d'une façon plus utilisable
avec VBA non?

 

[Cousinhub]

Re : selection d'une plage de cellules

Re-

bhbh = bricolagiticus hommo bricolage hop la

ou

Ben Heuh Bricolage? Hein?

😀😀😀

Donc je suppose qu'on peut agencer les données brutes d'une façon plus utilisable
avec VBA non?

Oui, il suffit de connaitre le mode d'extraction, le format et ensuite, un peu d'huile dans les neurones et hop!
sur son fichier par exemple, il risque d'avoir des soucis, l'extraction donne soit des dates, soit des données au format ??????
seuls (pour l'extraction souhaitée) les numéros 3203, 3204 et 3208 ont des dates cohérentes