| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 13/01/2014 à 17:04 | psdi | Probléme de format de cellule | Ma question est simple, malgré une programmation pour un format comptabilité à 2 chiffres après la virgule, j'ai un format sur la feuille un peu différent quand je vais sur la cellule de la feuille. Sachant que la macro pour avoir la référence je l'avais faite en manu et recopié le code (du format)... |
| 13/01/2014 à 16:27 | psdi | Probléme de format de cellule | Ci dessous la partie utile : ' ********************** Formatage des 2 valeurs ********************************** 'Pour le CAC 40 formatage normal --- "Action_1". If vPlacement = "Action_1" Then ActiveCell.NumberFormat = "#,##0" Else 'Pour les nombres conséquents, affichage en € 'Actif ----- "Action"... |
| 12/01/2014 à 17:30 | psdi | Otpimisation code VBA | Bon, j'ai usé et abusé du dernier programme plusieurs fois et tout se passe bien. Mais j'ai un autre Sous Programme , je ne peux pas utiliser la dernière méthode. J'ouvre un nouveau fil pour le traiter et je m'explique... |
| 12/01/2014 à 08:03 | psdi | Otpimisation code VBA | Ah, oui, je crois bien effectivement que c'est une bonne méthode et en plus l'écriture est concise. J'ai d'autres endroits où je vais pouvoir utiliser ce principe . Merci H2SO4... |
| 11/01/2014 à 21:40 | psdi | Otpimisation code VBA | Ok, Merci encore H2SO4. Je solde la fiche... |
| 11/01/2014 à 21:26 | psdi | Otpimisation code VBA | Encore une fois, gagné. Merci Essayé et déjà adopté. 2 petites questions : Question générale : quand on met dl = ... est on obligé, conseillé !!!! de déclarer ses variables? en Dim dl as Long par ex En terme de code puisque je suis sur que la ligne existe puisque je la sélectionne dans la listeBox e... |
| 11/01/2014 à 20:35 | psdi | Otpimisation code VBA | Ci-joint une petite partie du code que je voudrais optimiser (en temps). Pourquoi parce que très souvent les lignes à supprimer sont toujours celles du bas (les dernières) et je commence à avoir de nombreuses lignes. Il n'y a que 2 colonnes : la 1ére les dates et la 2éme le cours de l'action.: 'Rech... |
| 11/01/2014 à 13:09 | psdi | Optimisation code | Bien, je viens de faire un "choc de simplification", les essais sont bons , je solde la fiche. Effectivement le code est un peu moins lisible encore qu'on voit "venir" la lecture assez facilement. D'un autre coté , je cherche à supprimer du code quantité de noms déclarés qui ne me servent plus en de... |
| 11/01/2014 à 10:45 | psdi | Optimisation code | Question: dans mon programme j'utilise de nombreuses fois ce principe qui m'oblige à déclarer PremCell, DerCell et Plage_XX. Y aurait il plus court?. Ca fonctionne mais bon....... 'Charge les valeurs à transférer PremCell = Range(vNom_Actions & "A").Offset(0, -1).Address DerCell = Range(vNom_Actions... |
| 09/01/2014 à 21:47 | psdi | Optimisation du code | Parfait. J'ai chargé, tout est bon. Merci banzaï... |
| 09/01/2014 à 20:59 | psdi | Optimisation du code | N'y a t il pas plus court au niveau du code quand on a une plage nommée (cellules dans une même colonne) et une cellule unique un peu plus loin ( colonne différente) dans une feuille : Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("Liste_Plac... |
| 07/01/2014 à 18:23 | dirty_harry_8 | Calcul nombre jour de retard | Je viens d'essayer pour voir sur un fichier. Tout à l'air bon alors?. Il compte en négatif... |
| 03/01/2014 à 21:15 | lilia | Aidez moi svp c'est urgent | A voir si correspond à la demande. Il est possible de faire évoluer les paramètres suivant la valeur que l'on veut faire varier... |
| 03/01/2014 à 13:41 | psdi | Codage VBA Select Case ou autre manière? | Bon, le résultat attendu est parfait. C'est sur cela me raccourcit le code et j'ai appris Floor et Ceilling J'ai fait un essai : pour un Cac min de 2810 cela donne pour Floor 2800 puis -100 et MinScale = 2700 pour un CaC max de 4306 cela me donne un ceilling de 4400 puis +100 et MaxScale = 4500 Je s... |
| 03/01/2014 à 10:34 | psdi | Codage VBA Select Case ou autre manière? | Exemple de restitution pour des CAC 40 sur 1, 3 et 7 ans : j'ai appliqué ta méthode pour voir le résultat et le choix de l'échelle fait par Excel. les résultats sont pour un Cac sur 3 ans: -échelle min 2710 et le max est de 4406 avec des unités tous les 200 soit, affichage de 2910, 3110, etc, etc. A... |
| 02/01/2014 à 21:30 | psdi | Codage VBA Select Case ou autre manière? | Ma problématique , une petite partie du programme consiste à faire le graphe du CAC_40 et de ses MM20 et 50 qui sont préparées dans une feuille dédiée. Pour ça je passe les paramètres DateDeb et Date Fin Cac que je pilote avec une période de 1 à 7 ans depuis le ribbon. 'Création du graphe Cac_40 ave... |
| 02/01/2014 à 17:06 | AD76 | Ajouter | Si la structure à gauche est figé, ça devrait marcher?... |
| 02/01/2014 à 15:25 | bonico | Limiter la différence entre deux dates | J'ai fait quelque chose de différent. A voir si correspond à la demande sur le principe... |
| 01/01/2014 à 20:24 | johan87 | Filtrer les séries d'un graphique | Une série, c'est une cellule ou une ligne ou une colonne alors!!!!. Je ne vois pas comment on peut faire. Ca me parait difficile de combiner les 2 (liste déroulante ET Toutes les lignes) sur le même graphe mais place aux spécialistes qui ont d'autres idées et d'autres méthodes. Peut être en VBA?... |
| 01/01/2014 à 16:29 | johan87 | Filtrer les séries d'un graphique | Je ne sais pas si j'ai bien compris, j'ai mis 2 graphes: 1- Global : on choisit tout ou individuellement (case à cocher) 2- suivant liste déroulante... |
| 01/01/2014 à 08:38 | axou91 | Userform identification | Essaye : 'Fermeture du formulaire. Unload Me... |
| 31/12/2013 à 20:52 | johan87 | Filtrer les séries d'un graphique | Je n'avais fait avec des listes déroulantes. A+... |
| 30/12/2013 à 20:23 | aure_8 | Copier valeur VBA | Range("A" & i + 1 & ":N" & i + 6).Copy Range("A" & lg).PasteSpecial Paste:=xlValues... |
| 30/12/2013 à 18:05 | AlainBernard | Graphique dans Userform (Excel 2007) | J'ai trouvé un exemple codé légèrement différemment : Set legraph = Sheets("CommandesClts").ChartObjects(1).Chart graphCA = ThisWorkbook.Path &"\temp.gif" legraph.Export Filename:=graphCA, FilterName:="GIF" Image1.Picture = LoadPicture(graphCA) à essayer... |
| 30/12/2013 à 17:24 | AlainBernard | Graphique dans Userform (Excel 2007) | A voir : CA.Image1.Picture = LoadPicture(graphCA)... |
| 30/12/2013 à 11:49 | etoile | Userform : comment modifier et supprimer un enregistrement | J'ai essayé plusieurs modifs et tout était bon. Par contre , apparemment ce qui manque c'est une MAJ de la listeBox de l'Userform après modif. Ensuite pour la 2éme partie je pense que pour la suppression le N° de la ligne correspondante jusqu'à la dernière ligne devrait être décrémentée de 1 tout si... |
| 29/12/2013 à 11:18 | jojolafinance | Graph automatisé pr 1 période variable choisie manuellement | Bon, j'ai fait une synthèse pour ceux que cela intéresse. https://www.cjoint.com/c/CLDlmP98OQQ Merci Jean-Eric... |
| 27/12/2013 à 19:01 | jojolafinance | Graph automatisé pr 1 période variable choisie manuellement | Jean-Eric, je trouve ta solution intéressante, sans macro, mais je ne comprends pas tout. Pourrais tu m'expliquer rapidement une ligne d'une plage donnée : Dates =DECALER(Feuil1!$A$1;EQUIV(début;Feuil1!$A:$A;0)-1;0;EQUIV(fin;Feuil1!$A:$A;0)-1;1) et surtout comment se construit le graphique avec les... |
| 23/12/2013 à 18:11 | Tonthon | Axe vetical et horizontal | J'ai utilisé le graphique Nuage de points avec lignes droites et marqueurs (c'est ce que je lis avec Excel 2013 que j'ai depuis peu de temps. Avant j'étais en excel 2003 donc gros step et je n'ai pas l'habitude encore... |
| 23/12/2013 à 18:04 | clema91 | Erreur sur une date au premier Janvier | Je ne sais pas si la valeur attendue est 1 : Sub date_aa() date_a = "01/01/2021" no_semaine = Format(date_a, "ww", vbFirstFourDays) End Sub Attention, j'ai supprimé une virgule... |
| 23/12/2013 à 17:47 | Tonthon | Axe vetical et horizontal | J'ai supprimer le graphique et choisit un graphique. A voir si ça plait?... |
| 23/12/2013 à 16:22 | matoutou | Transférer des données horiz vers tablo en vertical | Apparemment, il existe la fonction Transpose mais je n'arrive pas à l'utiliser!!!!!. Peut être sauras tu ?. TRANSPOSE (TRANSPOSE, fonction) Cet article décrit la syntaxe de la formule et l’utilisation de la fonction TRANSPOSE dans Microsoft Excel. Vous trouverez des informations complémentaires sur... |
| 23/12/2013 à 15:34 | CAPUCIN | Liste nommee a mettre dans UserForm | 'Dans UserForm mettre la propriété : ShowModal = false Normalement , tu dois pouvoir retrouver la possibilité de manœuvrer la barre de défilement, je viens d'essayer sur un de mes userforms... |
| 23/12/2013 à 13:18 | johez | Planning et suivi journalier | En fait, je me suis fait ça un jour pour saisir des dates avec un calendrier. Là, il apparait à chaque" change". A adapter au besoin pour le déclenchement. l'Userform s'exporte dans un fichier et on peut l'importer d'un autre fichier Excel. Je ne sais pas mais si ça ne marche pas, il faut regarder c... |
| 23/12/2013 à 12:01 | Chand | Somme ajustée automatiquement | J'ai fait un exemple. J'espère avoir bien compris?... |
| 23/12/2013 à 11:45 | Tonthon | Axe vetical et horizontal | Avec Excel 2013, on choisit avec disposition rapide et là, on choisit ce qu'on veut. Tu peux nous envoyer ton fichier?... |
| 22/12/2013 à 21:53 | CAPUCIN | Liste nommee a mettre dans UserForm | J'ai fait l'exercice avec ListBox1 pas la ComboBox, ça marche, tu vérifies?... |
| 22/12/2013 à 21:30 | CAPUCIN | Liste nommee a mettre dans UserForm | Private Sub UserForm_Initialize() ListBox1.RowSource = "occurences" End Sub... |
| 22/12/2013 à 17:25 | CAPUCIN | Liste nommee a mettre dans UserForm | Private Sub UserForm_Initialize() Dim Occurences As Range 'Initiale la valeur du controle. ComboBox.RowSource = "" 'Charge les valeurs dans la Liste à partir du nom "Occurences" ComboBox.RowSource = "Occurences" 'Choix de la 1ére ligne à afficher de la plage. ComboBox.ListIndex = 0 'Met le focus sur... |
| 22/12/2013 à 16:05 | zinelamri | Probleme Macro qui supprime quelque ligne | Parfait j'ai effectivement tout compris avec le détail dans l'aide Excel de cette fonction. Merci encore @Banzai64. A+. Par ailleurs, j'aime beaucoup le Jurançon, un Landais qui parle... |
| 22/12/2013 à 12:03 | zinelamri | Probleme Macro qui supprime quelque ligne | Banzai; pourrais tu nous détailler un peu la partie de macro, je n'ai pas tout compris. Merci If Application.Subtotal(103, .Columns("F")) > 1 Then .Range("A2:E" & Nblg).SpecialCells(xlCellTypeVisible).Copy Range("A21")... |
| 20/12/2013 à 20:37 | aOrion | [aide] Formule de moyenne avec choix multiples | En fait j'ai regardé et décomposé pour voir un peu sommeprod et puis ce que faisait =A2:A5<>"" en résultat. C'est là que j'ai vu qu'on pouvait multiplié 2 nombres A2*B2* true = A2*B2 Puis j'ai regardé le numérateur et surtout le dénominateur comment se comportait Nb () s'il manquait une valeur... |
| 20/12/2013 à 19:55 | aOrion | [aide] Formule de moyenne avec choix multiples | Je viens de faire l'exercice pour voir car je ne connaissais pas ce principe , voila ce que ça donne et le résultat est bon apparemment... |
| 20/12/2013 à 18:47 | Loïc | [Aide] Graphique Excel | A voir si suffisant?... |
| 20/12/2013 à 14:16 | vinytony | Envoyer un mail via Excel -VBA | Un jour j'avais créé ça en suivant un bouquin (fichier excel vers messagerie outloock) Sub E_Mail_Sur_Clic(control As IRibbonControl) 'Cette routine permet d'envoyer le "Bilan_Portefeuille" par mail avec le fichier 'suivant une liste dans feuille "Destinataires". 'Attention : Cette routine ne foncti... |
| 19/12/2013 à 22:34 | BastLat | Affichage "proportionnel" d'un axe de graphique... Comment ? | Clic droit dans le graphe: Sélectionner les données Cellules masquées et cellules vides Relier les points des données par une courbe j'ai excel 2013... |
| 19/12/2013 à 18:30 | libellule85 | Impression d'un module VBA (en-tête) | Je pense que la réponse de Amadeus est la bonne puisque elle répond à ton besoin. Maintenant, j'ai fait une manip pour voir c'est d'exporter le module et puis l'ouvrir dans Word. Apparemment ce n'est pas si mal que ça et comme on peut renommer ses fichiers comme on veut !!!... |
| 19/12/2013 à 15:44 | libellule85 | Impression d'un module VBA (en-tête) | Je vais faire surement une réponse simple mais qu'est ce qui t'empêche de le mettre en début de code : 'Toto - Module3 - 1' '------------------------------------------------------------------------------------------------------------------------------ Sub----- End sub... |
| 19/12/2013 à 08:55 | obouana | Recherche date | Petite idée du matin . Maintenant, il devrait prendre en compte les jours fériés. Et puis j'ai mis une mise en forme plus sympa. Et il devrait être vite renseigné... |
| 18/12/2013 à 22:08 | awa123 | Traiter deux tableaux indépendamment | If gantt_m1(i) <> "" Then vide1 = False donc vide_1 = false idem pour vide_2 = false chaque fois qu'il y a une valeur donc je mettrais l'inverse If vide1=false And vide2=false Then MsgBox "tous les tableaux sont vides" quand la condition "vide1=false And vide2=false " est vrai Then MsgBox "tou... |