c

Membre habitué

Inscrit le :31/10/2015
Dernière activité :30/08/2023 à 23:37
Version d'Excel :2007
Messages
68
Votes
2
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par citaro

DateAuteur du sujetSujetExtrait du message
08/12/2020 à 07:17citaroWord- Ajouter nombre automatiquementMerci Chris ci annexé peut se trouver à n'importe quel endroit dans une phrase, pas en débute de paragraphe. Merci...
07/12/2020 à 20:32citaroWord- Ajouter nombre automatiquementBonsoir Je cherche une solution pour ajouter un chiffre automatiquement après la saisie du mot " ci annexé " pour la 1ere fois ci annexé 1 pour la 2me fois ci annexé 2 pour la 3me fois ci annexé 3 pour la 4me fois ci annexé 4.... Merci...
11/02/2019 à 15:45citaroTranspose depuis listbox vers feuilleMerci c'est le résultat attendu Pour info à quoi correspond dec = 0 etdec = dec + 1 Citaro...
11/02/2019 à 15:17citaroTranspose depuis listbox vers feuilleComment avoir le résultat sur la première ligne vide? Citaro...
11/02/2019 à 14:34citaroTranspose depuis listbox vers feuilleBoujour au forum, Je cherche à transposer des données issues d'un listbox de colonnes sur la première ligne vide de la feuille 3 en validant la fiche. de : a 17 b 10 c 5 d 1 en: a 17 b 10 c 5 d 1 Si quelqu'un peut m'aider Merci Citaro...
09/02/2019 à 06:32citaro Simplifier code suppressionMerci dhany et Jean-Eric , vos 2 solutions fonctionnent parfaitement Bon weekend Citaro...
08/02/2019 à 13:33citaro Simplifier code suppressionMerci, je regarde ce soir...
08/02/2019 à 11:52citaro Simplifier code suppressionMerci pour vos réponses, je restes celà après le travail, ce soir...
08/02/2019 à 11:03citaro Simplifier code suppressionSuppression des données de la feuille CAISSE colonne E à J Suppression des données de la feuille JOURNAL colonne A à AP Merci Private Sub CommandButton5_Click() Dim rep As Integer rep = MsgBox("Voulez-vous supprimer l'opération du " & TextBox1, vbQuestion + vbYesNo) If rep = vbYes Then Sheets("CAISS...
11/04/2018 à 10:13Fr3d Problème avec Fonction RECHERCHEVEn triant par ordre alphabétique les données qui alimentent la liste en D18, cela fonctionne Citaro...
05/04/2018 à 15:39mv83500Excel avec formulaire adhérent associationCitaro...
02/04/2018 à 19:01mv83500Excel avec formulaire adhérent associationVoici un fichier qui me semble une bonne base de travail pour votre demande Citaro https://forum.excel-pratique.com/viewtopic.php?f=2&t=83423&start=10...
06/10/2016 à 09:24citaroAlt F11Oui on peut mais la sécurité du mot de passe peut se contourner. Pour l'instant je fais comme ceci : Sub AltF11Pressed() If MsgBox("Si tu continues, toutes les données seront supprimées !", vbYesNo, "Confirmation") = vbYes Then ' Application.OnKey "%{F11}" ' Application.SendKeys "%{F11}" Supprimer_t...
03/10/2016 à 18:51citaroAlt F11En fait, c'est pour renforcer la sécurité du code. Si on ouvre l'éditeur VBA, le code et les feuilles sont supprimées...
03/10/2016 à 18:11citaroAlt F11Oui c'est un raccourci clavier Je voulais savoir si on fait Alt F11 peut-on empêcher l'affichage de l'éditeur VBA et faire afficher un userform Citaro...
03/10/2016 à 17:31citaroAlt F11Avez vous une solution pour afficher un userform quand on fait un Alt F11. Merci d'avance Citaro...
27/08/2016 à 12:53citaro Copier coller avec conditionDans le fichier joint, je fais un copier de la feuil1 toutes les lignes à partir de la ligne 10 jusqu'à la dernière ligne remplie si les valeurs de la colonne Q sont égales à B2, je veux le coller sur la feuil3 en A10. Idem pour les lignes de la feuil2 vers le feuil4. Le code ci-dessous me fait le c...
27/07/2016 à 10:57citaroUserform de modification et supressionJe vois ce que tu veux dire mais je ne sais pas le faire Merci...
27/07/2016 à 10:42citaroUserform de modification et supressionJ'ai crée un userform pour saisir des données sur une feuille, je n'arrive pas à trouver comment faire des modifications et suppressions de la feuille à partir du userform de saisies. J'ai ajouté un combobox de recherche qui doit alimenter les autres contrôles du userform et ainsi pouvoir modifier e...
27/04/2016 à 10:06citaroSimplifier code pour effacerOui, j'ai vu Merci bien...
27/04/2016 à 08:40citaroSimplifier code pour effacerC'est le 2ème cas le code : Application.Union(SdA.Range(SdA.Cells(LI, 1), SdA(Cells(LI, 8)), SdA.Range(SdA(Cells(LI, 17), SdA(Cells(LI, 27))).ClearContents provoque une erreur : Attendu séparateur de listes ou ) Donc j'ai pris le code du 1er cas 2 fois : SdA.Cells(LI, 1).Resize(1, 7).ClearContents S...
26/04/2016 à 21:57citaroSimplifier code pour effacerJe cherche à simplifier ce code qui efface des cellules à partir d'un userform Merci Private Sub CommandButton2_Click() Dim rep As Integer rep = MsgBox("Voulez-vous supprimer le code analytique " & TextBox1 & " " & TextBox2, vbQuestion + vbYesNo) If rep = vbYes Then SdA.Cells(LI, 1).ClearContents Sd...
23/04/2016 à 07:19citaro Modifier supprimer userformDésolé pour les problèmes de sécurité, et du temps que tu as consacré à ce fichier Tu as réussi à venir à bout des derniers problèmes, le fichier correspond à mes attentes Je te remercie de ton aide Très bon weekend Citaro...
22/04/2016 à 16:35citaro Modifier supprimer userformRe, Je viens de trouver un autre dysfonctionnement : Lorsque l'on saisit des données en cliquant sur Ajouter, j'ai le message d'erreur du post de 13:16 mais le report des données se fait sauf dans les colonnes de V à AA Merci...
22/04/2016 à 13:16citaro Modifier supprimer userformJe viens d'ajouter les valeurs à la propriété des tags je rencontre toujours un problème d’incompatibilité de type en avec le combobox recherche dans le ComboBox1_Change() à la ligne : If Not CTRL.Name = "ComboBox1" Then CTRL.Value = R.Cells(LI, CByte(CTRL.Tag)).Value En validant l'ajout de données...
22/04/2016 à 11:55citaro Modifier supprimer userformJe n'avais pas remarqué cela sur ton 1er fichier, je m'y mets merci encore pour ton aide...
22/04/2016 à 11:36citaro Modifier supprimer userformNon je suis largué sur le tag, j'ai du mal à comprendre...
22/04/2016 à 11:01citaro Modifier supprimer userformThauThème, Quels problèmes de sécurité rencontres- tu avec mon fichier ? Je viens de tester le code, je rencontre un problème d’incompatibilité de type en avec le combobox recherche dans le ComboBox1_Change() à la ligne : If Not CTRL.Name = "ComboBox1" Then CTRL.Value = R.Cells(LI, CByte(CTRL.Tag))...
22/04/2016 à 06:45citaro Modifier supprimer userformMerci pour tes explications; elles m'ont permis d'avancer sur le 1er fichier Désolé pour le second fichier plutôt brouillon, je l'ai revu, il est sans signature maintenant Je me suis servi du 1er fichier pour le faire second avec useform, il a comme colonne de départ F de la feuille "Suivi des Actio...
21/04/2016 à 21:38citaro Modifier supprimer userformJe me suis servi du fichier précédent pour un autre useform avec comme colonne de départ F de la feuille "Suivi des Actions" Je bloque sur ComboBox1_Change() avec un arrêt sur la ligne : TL(J, K) = TV(I, J - 1) 'récupère dans la ligne J colonne K de TL, la donnée ligne I colonne J-1 de TV (Transposi...
21/04/2016 à 17:33citaro Modifier supprimer userformPeux-tu m'expliquer à quoi correspond le 6 sur la ligne : Me.CbDeptCODD.List = L.Range("K7:K" & L.Cells(Application.Rows.Count, 6).End(xlUp).Row).Value 'alimente la combobox Merci d'avance...
21/04/2016 à 17:07citaro Modifier supprimer userformExcellent ton fichier, mais quel travail tu as eu, tu as tout repris le code Je ne pensais pas qu'il y avait autant de modifications à apporter Grand merci à toi De plus tu as tout commenter, ça va m'aider à comprendre le code vba Bonne soirée Citaro...
21/04/2016 à 08:21citaro Modifier supprimer userformDans le fichier joint j'ai un userform qui alimente une feuille(Ressource CODD), je souhaiterai pouvoir modifier et supprimer des données après sélection dans un combobox. Je ne sais pas comment m'y prendre la combobox Recherche correspond à la colonne B "Nom" Je cherche à charger les texbox et comb...
19/03/2016 à 22:10citaroImage userform valeur textboxMerci pierre.jy C'est bon, avec ce code j'ai réussi à finir mon fichier Bon weekend...
19/03/2016 à 20:29citaroImage userform valeur textboxDans un userform j'ai 5 textbox avec une valeur, j'aimerai avoir une image sous le textbox qui a la plus grande valeur Merci...
01/03/2016 à 16:21citaroSupprimer feuilleMerci Je n'avais pas penser à On Error Resume Next Bonne soirée...
01/03/2016 à 05:45citaroSupprimer feuilleJe cherche un bout de code pour supprimer une feuille en fonction de son nom : Si feuille TEST existe alors on la supprime Si feuille TEST n'existe pas alors pas d'action Merci d'avance Citaro...
01/01/2016 à 11:23citaroSuppresion des 2 dernières colonnesBonne année à tous, La solution pour d'autres visiteurs Option Explicit Sub Dernière_colonne_supprimer() Range("f2").End(xlToRight).Offset(, -1).EntireColumn.Resize(, 2).Delete Range("e2").Select End Sub Citaro...
31/12/2015 à 16:21citaroSuppresion des 2 dernières colonnesEn ce dernier jour de l'année, bonjour au forum Dans le fichier joint, je voudrais rechercher et supprimer par macro les 2 dernières colonnes à droite dont la ligne 2 est non vide et bloquer la macro si on arrive à la colonne E Citaro, bon réveillon...
30/12/2015 à 17:14citaro Filtres sur données numériquesMerci Banzaï, je ne connaissais pas cet opérateur Bonne fin d'année...
30/12/2015 à 16:26citaro Filtres sur données numériquesQuels modifications as tu fait, pour finir ma journée en ayant appris quelque chose cela fonctionne Merci...
30/12/2015 à 15:29citaro Filtres sur données numériquesDans mon fichier se trouve 2 userform, un pour la feuille Compte ASC, le second pour la feuille Compte Fonct. Le filtre pour les groupes et catégories ne fonctionne pas ? Les données des groupes et catégories sont des nombres, si je mets de texte cela fonctionne ? Citaro...
10/12/2015 à 14:01citaro Valeur Combobox en fonction d'une autre ComboboxMerci Banzaï, Ton fichier répond à mes attentes Citaro...
10/12/2015 à 09:14citaro Valeur Combobox en fonction d'une autre ComboboxDans mon fichier il y a une colonne avec 4 départements, puis 4 colonnes avec les villes de chaque département Dans mon UserForm j'ai une Combobox1 qui récupère les valeurs de la colonne des départements Je n'arrive pas à alimenter la Combobox2 en fonction du choix de la Combobox1 Avec le fichier ce...
01/12/2015 à 16:07citaro Suppression par usefrormMerci vbrod Finalement j'ai mis ce code Sheets("Secteur").Cells(ComboBox1.ListIndex + 2, 1).Delete Shift:=xlUp Problème réglé Citaro...
01/12/2015 à 15:05citaro Suppression par usefrormLa donnée qui a été sélectionnée dans la combobox Recherche, elle se trouve en colonne A...
01/12/2015 à 14:55citaro Suppression par usefrormDans mon fichier, j'alimente une BDD par un userform, Lors de la suppression d'une donnée tout la ligne est supprimée, je souhaiterais simplement supprimer la donnée de la colonne A le code : Private Sub CommandButton5_Click() Dim rep As Integer rep = MsgBox("Voulez-vous supprimer le contact " & Com...
22/11/2015 à 09:23citaroLister feuilles visiblesMerci à vous 2 Ce dernier code répond à mes attentes Bon dimanche Citaro...
22/11/2015 à 08:08citaroLister feuilles visiblesMerci pour le code, je l'ai placé dans le worhsheet de la Feuil1 Peut on lancer le code à chaque création de feuilles automatiquement? Merci...
22/11/2015 à 06:51citaroLister feuilles visiblesJe cherche à lister les feuilles non masquées (visibles) d'un classeur, pour en faire une liste en A1 de la feuil1. Bon dimanche Citaro...