Fonction excel "suite logique chiffre"

sab07 sab07
3 contributions
Membre depuis le 09/08/2011
Envoyé le 09/08/2011 à 08:47


Bonjour,
voici mon souci
Exmple dans le fichier j'ai
colonne B : 3321
colonne C : 3325
Ce qui veut dire qu'il faut prendre les codes de 3321 à 3325

Mais moi dans mon futur fichier j'ai besoin de TOUTES les lignes et il me faut donc 3321, 3322, 3323, 3324 et 3325

Comment je peux faire pour éviter de me taper toutes les lignes pour rajouter celles qui manquent...
merci de vos solutions
Sabrina
Claude40 Claude40
1 533 contributions
Membre depuis le 24/03/2010
Envoyé le 09/08/2011 à 11:19 Modifié par Claude40


Bonjour,
Si j'ai bien compris, tu veux inscrire une série de chiffres consécutifs sur une ligne de tableau Excel.
Lorsque l'on saisit les deux premiers chiffres de la série, que l'on sélectionne les deux cellules et que l'on "étire" la sélection, on obtiennt automatiquement la série de chiffres consécutifs souhaitée. C'est pareil en ligne comme en colonne.
C'est tellement simple que je crains d'avoir mal compris le problème !
Un bon exposé du problème, c'est déjà un grand pas vers la solution. Dans la mesure du possible, mes solutions sont testées, sur mon système actuel (W10 Pro version 1909), mais peuvent ne pas fonctionner sur tous les Pc
sab07 sab07
3 contributions
Membre depuis le 09/08/2011
Envoyé le 09/08/2011 à 17:16


Malheureusement non ce n'est pas la réponse que j'attendais. Pour être plus précise, j'ai 2 colonnes. La 1ère avec un début de chiffre (des codes postaux, exemple 13320) et en seconde colonne un chiffre de fin (exemple 13970) et je veux une formule qui dise : pour tout ce qui est compris entre 13320 (col 1) et 13970 (colonne 2) alors "un nom de ville" (qui est dans un autre onglet d'excel - exemple : Aubagne (col 1) ET UNE 2è Col avec le CP correspond 13400. J'imagine bien qu'il faut une rechercheV mais comment lui dire un chiffre "compris entre"

Sabrina
Claude40 Claude40
1 533 contributions
Membre depuis le 24/03/2010
Envoyé le 10/08/2011 à 01:17


Bonjour,
C'est un peu plus clair, mais ce n'est plus la même description du problème.
Il est tard, je vais chercher demain. A priori, je verrai plutôt une macro simple à comprendre et à mettre en place.
Un bon exposé du problème, c'est déjà un grand pas vers la solution. Dans la mesure du possible, mes solutions sont testées, sur mon système actuel (W10 Pro version 1909), mais peuvent ne pas fonctionner sur tous les Pc
Claude40 Claude40
1 533 contributions
Membre depuis le 24/03/2010
Envoyé le 10/08/2011 à 22:54


Bonsoir,
Voici une petite macro qui devrait résoudre le problème.
J'ai fait un jeu d'essai qui comporte 5 lignes de code "Mini" "Maxi" en feuille 1 et 12 codes postaux et noms de villes à rechercher en feuille 2.
Le résultat de la recherche est en feuille 1 à partir de la colonne C.
Pour le réel, il faut, bien sûr, ajuster la macro en fonction des informations à traiter et principalement le nombre de lignes de chaque feuille de calcul.
Voici la macro :

Sub recherche()
Range("C1:M5").Clear
'
'
'Ce jeu d'essai comporte 5 lignes pour les codes "bornes mini et maxi et 12 ligne de villes à recherche entre les bornes.
For ColIndex = 1 To 1 ' le Mini est en colonne 1
For rwIndex = 1 To 5 ' il y a 5 lignes
myrw = rwIndex

critere = Cells(rwIndex, 1) - 1
mycol = 3
' on va faire la recherche n fois, n la différence entre maxi et mini (appelé ici Maxcount)
Maxcount = Cells(rwIndex, 2) - Cells(rwIndex, 1)
For Counter = 1 To Maxcount 'boucle de recherche

critere = critere + 1
With Worksheets("Feuil2").Range("A1:A12")
Set C = .Find(critere, LookIn:=xlValues)
If Not C Is Nothing Then
myrow = C.Address
Mid(myrow, 1, 3) = "000"
Cells(rwIndex, mycol) = Worksheets("Feuil2").Cells(myrow, 2)
mycol = mycol + 1
Cells(rwIndex, mycol) = Worksheets("Feuil2").Cells(myrow, 1)
mycol = mycol + 1
Else
End If
End With
Next Counter 'fin de la boucle
Next rwIndex
Next ColIndex
'le code ci-dessous ajuste la largeur des colonnes de résultat en fonction du contenu.
Worksheets("Feuil1").Range("C1:Z5").Columns.AutoFit

End Sub

Je joins aussi une image des feuilles Excel 1 et 2 avec le résultat sur le jeu d’essai
A noter que dans le résultat les codes postaux sont présentés dans l'ordre croissant alors qu'ils peuvent être dans n'importe quel ordre sur la feuille 2




Un bon exposé du problème, c'est déjà un grand pas vers la solution. Dans la mesure du possible, mes solutions sont testées, sur mon système actuel (W10 Pro version 1909), mais peuvent ne pas fonctionner sur tous les Pc
sab07 sab07
3 contributions
Membre depuis le 09/08/2011
Envoyé le 11/08/2011 à 08:44


Merci merci, c'est top !!!
ça je sais pas faire moi et j'aurais mis un temps fou à la main ..... J'ai 20000 LIGNES !!! :-)
Encore merci

Sabrina
Claude40 Claude40
1 533 contributions
Membre depuis le 24/03/2010
Envoyé le 11/08/2011 à 09:28


Merci du retour,
A ta disposition en cas de problème pour ajustement de la macro aux dimensions des fichiers réels.
Bonne journée.
Un bon exposé du problème, c'est déjà un grand pas vers la solution. Dans la mesure du possible, mes solutions sont testées, sur mon système actuel (W10 Pro version 1909), mais peuvent ne pas fonctionner sur tous les Pc

Discussion trop ancienne

Cette discussion a été automatiquement fermée car elle n'a plus reçue de nouveau message depuis trop longtemps.

Nous vous suggérons de créer un nouveau message

« Retour sur la liste des messages de ce forum