Recherche:

Bonjour,

Si j'ai bien compris, tu n'as pas envie de te coltiner 5000 fusion à la main.

je vois ca en trois étapes, en supposant que toutes tes données a fusionner soient en colonne A :

1 -...

Il me semble que la répétition de tabulation n'est pas dispo dans 2007. Mais ya d'autres astuces

Trop badass pour moi, je ne sais pas faire. Je ne sais qu'interroger du format html avec Excel ou des bases de données en SQL. Le décryptage de pdf sort du cadre "Excel". Là ton truc, je peux juste...

Bonjour,

Alors, si tu veux apprendre ... Bon, déjà la récup des données

Déjà, pour la récupération des informations depuis une siteweb. Il y a un outil Excel assez simple d'utilisation :

La...

STOP !

Formule "Webservice"

Apprends à utiliser les requêtes Xpath.
Et voilà

Pas de code VBA.

Bonjour,

quell est ta version d'excel ?

En supposant que ta colonne A contienne les mois
B les valeurs :
Pour juin

=MAX(SI(A1:A30="Juin";B1:B30;0))

La formule est à valider en matricielle (ctrl+maj+entrée)

Donc là, c'est pour 30...

je ne peux pas teprépondre pour Excel 2000.




pour 2007 :


Sub test()

Pas compris

Solution basée sur les filtres :

Insère une colonne en A:A
Remplis-y les valeurs de 1 à 15. prolonge de manière a répéter 123...15 plusiuers fois.

Puis fais un filtre sur la valeur de ton...

Dans certaines classes de stat, on enseigne la simulation de nombre aléatoire pour déterminer une espérance, lorsque la loi devient très compliqué à simuler. Donc pourquoi pas si la règle est...

Si j'ai bien compris, tu cherches à créer ton propre générateur de nombre pseudo aléatoire avec la possibilité de retrouve ce nombre depuis un seed.
J'avoue ne pas avoir compris la totalité de ton...

C'est pas clair. un exemple avec des données clarifieraient ça.

A priori, tu dois juste récupérer le font.color, tester si il est gris



'AIR CODE !!! Attention
if Sheets("Allianz Euro HY Bond").Cells(i, j).Font.Color = 15395562 then
msgbox "ske tu veux...

Attention, pour le calcul de distance à partir de coordonnées, tu ne peux PAS faire une bête distance cartésienne. Tu ne travail pas sur un plan mais un globe.

Ensuite, tu souhaites une distance...

Bon, en tout cas, quand tu utilises l'enregistreur de maccro, essayes de ne pas utiliser des nom d'onglet à espace genre "TCD oins"

Pour traiter ce genre de cas, il faut ajouter des 'TCD Soins' ...

Pur hasard :


tente


ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Data!R1C1:R1048576C30", Version:=xlPivotTableVersion14).CreatePivotTable _
...

jej,

Quelle version utilises-tu ?
Quelle est la ligne qui plante ?

Si j'ai bien compris, tu as deux étapes :

Une étape de transformation des données pour passer de
a b c d
1 2 3 4

vers
a b=2 c=3 d=4

Et une autre étape pour passer substituer des mots

pas plutôt

Type=PORTE Hauteur=2.5 Largeur=0.07 ... Couleur=ROUGE ?

Bon, si j'ai bien compris, et ce n'est pas certain

La solution pas trop compliqué :
Tu crées un nouvel onglet "AZE"...

Un peu dur de juger comme ça mais a priori :


Private Sub Prix()

Last = Sheets("BASE").Range("A200").End(xlUp).Row
For X = 1 To Last
If Sheets("BASE").Range("A" & X).Value =...

Bonjour Loupion,

Voici une solution purement "manip", sans vba

Si j'ai bien compris ce que tu cherches à faire, tu cherches à réaliser un "UNPIVOT"

On a déjà traiter un problème équivalent...

Bon, en tout cas, les quelques conseils basiques.


Si ce n'est pas déjà fait, les gains peuvent être TRES important

Place un

application.screenupdating = false
Application.Calculation =...

Bon déjà :


For n = 1 To c
R2 = Mid(Worksheets("prélèvement").Cells(i, 3), n, 1)
If R2 = "," Then t = 1
Next n

Si j'ai bien compris, ca cherche si la celulle contient un ",".
La fonction...

Bonjour,

Recupère UNE FOIS le résultat de la msgbox dans une variable
gener :


dim a as variant
a = MsgBox("Voulez-vous vérifier la TVA sur les débits?", vbYesNo, "Vérif RAN TVA débits")
...