Contenu récent par LouisBlanc

Re : Graphique dynamique en VBA OK Après plusieurs essais, ça fonctionne. Il faut d'abord mettre en variable l'adresse de la sélection convertie, puis mettre cette variable dans le Range du SetSourceData code ci dessous plage = Range(Cells(pl, pc), Cells(dl, dc)).Address() Charts.Add...

Re : Graphique dynamique en VBA Bonjour pierrejean je ne comprends pas ta réponse. Si par exemple j'ai une sélection type Range ("C2:F15"), j'ai : pl = 2 pc = 3 dl = 15 dc = 6 avec ma sélection qui est : plage=range(cells(pl,pc), cells(dl,dc)) Or, l'instruction SetSourceData n'accepte pas le...

Bonjour à tous Dans une macro, je fais un graphique à partir d'un tableau donc le nombre de ligne et le nombre de colonne changent en fonction du traitement. Je sais définir la plage sous la forme range(cells(pl,pc),cells(dl,dc)), mais VBA attend la plage sous forme range("A1:F15") par...

Re : Sauver sou - boite d'alerte Bonjour à tous Merci Gilbert_RGI Ca marche. Je vais essayé d'adapter ça à mon problème pour rester sur la proposition d'un nom sans le chemin complet. A+

Re : VBA : Supprimer 1 ligne sur 2 Merci beaucoup. Et félicitations à tous pour la qualité de vos propositions. Peut être à bientôt

Re : VBA : Supprimer 1 ligne sur 2 Merci comprends pas, surement bug du net, je n'avais pas vu les posts #47 et #48 avant d'envoyer mon dernier message. Job75 : super, j'avais essayé un truc du genre, mais ça ne marchait pas. Comme je suis débutant, surement une erreur de code. Je vais...

Re : VBA : Supprimer 1 ligne sur 2 Re-Bonjour Ci dessous un petit bout de code qui fonctionne bien pour ce que j'ai a faire, mais est il possible d'éviter l'étape intermédiaire ? Auriez vous des idées ??? Sub ess2() 'préparation du tableau exemple ActiveSheet.Name = "départ" For i = 1 To...

Re : VBA : Supprimer 1 ligne sur 2 Bonjour à tous Mon projet avance grâce à vous, mais je me pose encore quelques problèmes. J'ai une variable tableau qui contient 30000 lignes sur 1 colonne. Je voudrais transférer les valeurs de ce tableau, dans un autre tableau de 1000 lignes et 30...

Re : VBA : Supprimer 1 ligne sur 2 Bonjour En fait, j'ai des tableaux de x lignes et y colonnes (x et y pouvant changer suivant la configuration). Je souhaite créer une colonne supplémentaire (y+1), qui contiendrait la moyenne de chaque ligne des y colonnes, puis afficher le résultat. Dans...

Re : VBA : Supprimer 1 ligne sur 2 Oui, ça c'est ok. Mais c'est la somme, ou la moyenne, (ou autre) de ligne ou colonne d'une variable de type tableau, sans passer par une boucle. Par exemple j'ai une variable tableau de 10 lignes et 5 colonnes. Je voudrais obtenir une seconde variable tableau...

Re : VBA : Supprimer 1 ligne sur 2 Tu as raison. Ci dessous exemple de code à partir d'une feuille avec un tableau contenant des valeurs en A1:C10 Sub essaitab() 'Dim tab1 As Variant tab1 = Range("A1:C10").Value 'transfert du tableur dans tableau Range("e1:G10").Value = tab1 'transfert du...

Re : VBA : Supprimer 1 ligne sur 2 Bonjour à tous Je poursuis un peu mon problème. Comme je connais à l'avance les dimensions de mon tableau (infos que je récupère en entête du fichier), j'avais retenu une solution proche de celle à Laetitia. Maintenant, je continue mon traitement, mais je...

Re : VBA : Supprimer 1 ligne sur 2 Merci encore à tous. Je suis obligé de décrocher maintenant...... Je reprends tout ça prochainement, car ma macro est loin d'être terminée. Je n'hésiterai pas à solliciter vos compétences. Cordialement

Re : VBA : Supprimer 1 ligne sur 2 Vraiment super à tous. sur mon pc : bhbh est à 0,26s laetitia 90 est à 0,14s moi, à 4,5s Les autres je n'ai pas encore testé, mais là, y a pas photo...... Bravo à tous. Maintenant je vais intégrer ça à ma macro générale.... Ah que je suis content !!!! J'ai...

Re : VBA : Supprimer 1 ligne sur 2 Ci dessous mon bout de code par rapport au message précédent sub essai() Dim tab_exemple() ReDim tab_exemple(nbligne, nbcolonne) 'Enregistrement des valeurs dans le tableau tab_exemple = Range(Cells(19, 1), Cells(nbligne + 19, nbcolonne)).Value 'création...