Membre fidèle

Inscrit le :10/04/2015
Dernière activité :05/07/2021 à 19:12
Version d'Excel :2007 FR
Messages
197
Votes
0
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par aiglon74

DateAuteur du sujetSujetExtrait du message
10/04/2021 à 18:28aiglon74Automatisé une formule en passant par UserFormVoici mon problème Je voudrais automatisé la formule =SI(G17="";"";RECHERCHEV(G17;emp!$O$18:$P$22;2;FAUX)) en feuil accueil cliquer sur recherche par emplacement en feuil emp taper dans la cellule emplacement ex R10D1 en feuil emp en cliquant sur modifier (code 118) un UserForm1 s'ouvre En tapant un...
21/03/2021 à 22:00aiglon74 Confort visuel clignotementEn tout cas un grand merci pour l'exercice mais surtout pour la leçon merci les pros aiglon74...
21/03/2021 à 21:26aiglon74 Confort visuel clignotementRe ca fonctionne mais ' Application.ScreenUpdating = False ces bien contre le scintillement de l'écran aiglon74...
21/03/2021 à 19:15aiglon74 Confort visuel clignotementJe viens de testé l'idée de Joco7915 sa ne change rien comme le dit ric les macros affichage et affichage1 ne font pas appel aux macros susnommées j'ai le même fichier avec une macro plus simple en feuil nouvelle ref mais ne répond plus a ma demande en voici le code Private Sub Worksheet_Change(ByVa...
21/03/2021 à 16:46aiglon74 Confort visuel clignotementJ'ai juste un problème visuel(confort visuel) en cellule b8 exemple j'écris essai tab pour passer a la cellule déprotège suivante j'ai un clignotement si je passe encore a la cellule suivante sans rien écrire pas de clignotement par contre si j'écrit A dans la cellule suivante j'ai un clignotement l...
20/03/2021 à 09:43aiglon74 Efface le contenu d'une celluleJe te remercie pour ta réponse efficace ca marche super bien pour moi merci de partager tes connaissances bonne journée aiglon74...
19/03/2021 à 23:42aiglon74 Efface le contenu d'une celluleRe je joins un petit fichier aiglon74...
19/03/2021 à 17:59aiglon74 Efface le contenu d'une celluleVoici un petit problème du moins pour moi j'ai macro qui ouvre et ferme plusieurs feuil(par bouton) qui fonctionne très bien Edit : merci de mettre le code entre balises avec le bouton </> mais je voudrais la modifier et y rajouter efface le contenu de la cellule E17 quand je ferme la feuil "r...
17/03/2021 à 22:31aiglon74 Blocage Private Sub Worksheet_Change(ByVal Target As Range)Tout d'abord j'espère que ton petit souci et résolu je viens de teste ta macro nickel tip top merci pour ton aide précieuse et pour la leçon A+ Aiglon74...
16/03/2021 à 21:13aiglon74 Blocage Private Sub Worksheet_Change(ByVal Target As Range)Désolé pour ton petit souci j'espère rien de grave A+ aiglon74...
16/03/2021 à 17:39aiglon74 Blocage Private Sub Worksheet_Change(ByVal Target As Range)Je reprend mon explication je voudrais que la macro fasse Je tape R11TB2 en b8 (qui est en feuille liste colonne E1) avec tabulation je passe a la cellule suivante tape une donnée re tabulation re tape une donnée ect... et enregistre la ligne en feuille base et moi j'ai une msgbox qui apparait a cha...
15/03/2021 à 21:35aiglon74 Blocage Private Sub Worksheet_Change(ByVal Target As Range)Je viens de teste ta macro elle fonctionne bien 1 fois a la 2eme fois elle recopie bien en a1 mais pas en e1 de + si la frappe en cellule b8 feuil nouvelle réf correspond bien a une cellule de la colonne b feuil base le message Connais-tu le mot de passe apparait hors il faudrait juste enregistrer a...
14/03/2021 à 23:38aiglon74 Blocage Private Sub Worksheet_Change(ByVal Target As Range)Je teste et te tiens au courant mais déjà merci pour ta réponse et tes explications qui me font avancé dans mon apprentissage bonne soirée aiglon...
14/03/2021 à 18:44aiglon74 Blocage Private Sub Worksheet_Change(ByVal Target As Range)Bonsoir a tous je débute en VBA et la je bloque en ligne surligner jaune le code entre les 2 surlignage bleu fonctionne bien le code et sur ma feuil nouvelle ref Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False 'force la majuscule If Not Intersect(Target, Range("B...
13/03/2021 à 12:47aiglon74Boite de dialogueJe reviens vers je n'arrive pas a automatisé Private Sub Worksheet_Change(ByVal Target As Range) feuil2 j'ai une boite de dialogue oui non quand je clique sur oui je voudrais déclencher une macro Sub copycolle() automatiquement pour le moment en appuyant sur le bouton bleu sa fonctionne voir fichier...
12/03/2021 à 21:52aiglon74Boite de dialogueBonsoir je reformule ma demande voir le fichier en tout cas merci aiglon74...
11/03/2021 à 22:57aiglon74Boite de dialogueJe viens de tester je n'est pas de boite de dialogue (oui non) si je tape R11T21 qui N'existe pas en feuil liste colonne E (ERREUR de ma par E pas D) aiglon74...
11/03/2021 à 21:19aiglon74Boite de dialogueSi le résultat de B8 FEUIL 1et dans colonne D liste on enregistre ca ok si la frappe B8 FEUIL nouvelle réf n'est pas dans colonne D feuil liste un message apparait on créer ou pas la je bloque comment faire apparaitre cette boite de dialogue je choisi créer on enregistre B8 FEUIL nouvelle réf en col...
11/03/2021 à 18:17aiglon74 Optimisé la macro 3Merci pour ta réponse ok pour moi aiglon74...
11/03/2021 à 17:29aiglon74 Optimisé la macro 3J' ai les feuils qui scintille en exécutant la macro 3 pas joli en visu et si possible si le résultat D16 FEUIL 1 n'est dans colonne A feuil2 un message apparait on créer ou pas par avance merci aiglon74...
06/03/2021 à 16:10aiglon74 Rendre cellule invisibleRe merci pour tes explications ok pour moi encore merci aiglon74...
06/03/2021 à 13:46aiglon74 Rendre cellule invisibleTrès bien exactement ce que je voulais tu peux expliquer un peu pas tout compris aiglon74...
06/03/2021 à 12:16aiglon74 Rendre cellule invisibleVoici mon problème en feuil recherche diam (fichier joint) en cellule jaune je tape 1 diamètre feuil base et j'ai la ou les positions en ligne 17 pour plus de visibilité je voudrais que les cellules ou la position et vierge soit transparente déjà es possible les cellules en lignes 17 soit visible qu...
02/03/2021 à 22:21aiglon74Adapter recherche empComment copier en feuil liste la cellule d8 feuil nouvelle ref en colonne C de la feuil liste comme la cellule b8 nouvelle ref en colonne A de la feuil liste le fichier en post plus haut merci par avance Aiglon74...
01/03/2021 à 22:42aiglon74Adapter recherche empRe tout a fait l aiglon74...
01/03/2021 à 22:35aiglon74Adapter recherche empRe pas tout je débute on apprend...
01/03/2021 à 21:51aiglon74Adapter recherche empRe j'ai remplacer With Sheets("Liste") par With Sheets("base") ca fonctionne mais la toupie bloque...
01/03/2021 à 19:16aiglon74Adapter recherche empRe If Target.Address = "$D$12" Then 'Affiche si la valeur et dans la liste If Target = "" Then Exit Sub With Sheets("Liste") ces la feuil base Set cel = .Columns("C").Find(what:=Target, LookIn:=xlValues, lookat:=xlWhole) If Not cel Is Nothing Then cel.Offset(0, 1).ClearNotes Else MsgBox Target & " n...
01/03/2021 à 19:10aiglon74Adapter recherche empRe normalement on va chercher dans la feuil base pas dans liste liste nous permet de créé base...
01/03/2021 à 18:37aiglon74Adapter recherche empRE Je viens effacer ma base remise a zero mais dans la colonne c feuil liste j'ai rien a initial je n'est rien a cette emplacement aiglon74...
01/03/2021 à 17:25aiglon74Adapter recherche empJe viens de teste la macro le seule problème relevé quand je crée une donnée et que je vais cliquer sur recherche référence je mais en cellule D12 13.100 dernière création une fenêtre MICROSOFT apparait 13.100 non trouve or que j'ai bien mes donnée affiché...
28/02/2021 à 22:48aiglon74Adapter recherche empRe merci pour le tout je test ca a fond et je reviens vers toi aiglon74...
28/02/2021 à 22:33aiglon74Adapter recherche empMerci pour ta réponse mais la modif tu peux expliquer rapide aiglon74...
28/02/2021 à 21:46aiglon74Adapter recherche empJe voudrais adapter le code de la feuil4 a la feuil3 ca bloque au niveau de la toupie pour moi tout en gardant le code de le feuil4 feuil3 recherche référence feuil4 recherche emplacement merci par avance aiglon74...
28/02/2021 à 16:41aiglon74 Affichage avec Private Sub Worksheet_ChangeMerci pour ta réponse rapide et efficace aiglon74...
28/02/2021 à 15:35aiglon74 Affichage avec Private Sub Worksheet_ChangeVoici mon souci en cellule E17 J'ECRIS R11A1 je vais cherche les données correspondant en feuil Base fonctionne bien mais je m'arrête en cellule J12 Alors que voudrais allez jusqu'à P12 comment modifier mon Private Sub Worksheet_Change en feuil4 je joins mon fichier plus explicite...
27/02/2021 à 20:04aiglon74 Modifier macro enregistrementRe merci pour ta réponse aiglon74...
27/02/2021 à 19:07aiglon74 Modifier macro enregistrementGénial au top si j'ose une explication en face des lignes possible mais sincèrement merci...
27/02/2021 à 16:26aiglon74 Modifier macro enregistrementJe joins mon fichier La macro valider_nouvelle_donnée que j'utilise fonctionne très bien jusqu'à la cellule désignation mais je voudrais allez jusqu'à la cellule commentaire pour enregistrer et la galère si quelqu'un a une idée je suis preneur merci par avance aiglon74...
17/05/2017 à 19:16aiglon74Protection cellule et deprotectionBonsoir Jean-Eric tout d'abord grand merci pour ta réponse que je viens d'adapté a ma feuille Excel tout fonctionne correctement encore MERCI aiglon74...
16/05/2017 à 19:48aiglon74Protection cellule et deprotectionVoici mon deal que je n'arrive pas a faire quand j'écris un nombre dans la cellule E8 de ma feuil 14xxx je voudrais que la cellule D8 qui est protège ce déprotège automatiquement pour y écrire des notes et ce protège automatiquement pour aller en E9 (avec tabulation par ex) et même principe avec D9...
06/03/2016 à 21:23aiglon74Impression couleur sous conditionOk un peu perdu mais je te tiens au courant...
06/03/2016 à 16:18aiglon74Impression couleur sous conditionVoici la macro qui ce trouve dans mon fichier joins Private Sub CommandButton1_Click() 'aiglon74 '--- Déclaration des variables Sheets("base").Visible = False Sheets("base").Activate For ln = 7 To Range("B" & Rows.Count).End(xlUp).Row f = Left(Range("B" & ln), 1) l = Mid(Range("B" & ln), 2, 1) c = R...
05/03/2016 à 18:08aiglon74Impression couleur sous conditionRegarde dans le fichier joins feuille UserForm4 code le tous fonctionne bien je voudrais juste de la couleur dans le tableau d'impression pour attirer œil sur les cellules qui corresponde en feuil BASE D1A cellule B7 5575 cellule C7 M30 cellule D7 mecatool cellule G7 en feuil impr passe en cliquant...
04/03/2016 à 19:42aiglon74Impression couleur sous conditionNon je dit si je fait une impression de ma feuille BASE ecrit en rouge en passant par impression et apercu impression pas de probleme mais je passe par une macro de remise en forme et la je bloque voir fichier...
04/03/2016 à 18:54aiglon74Impression couleur sous conditionPour le MFC ok pas de souci mais pour l'importer dans ma macro impression la je bloque en feuille BASE meme si la police et en rouge a l'impression avec ma macro la police et noir cordialement aiglon74...
03/03/2016 à 18:56aiglon74Impression couleur sous conditionJe joins un fichier je créer un emplacement ok D3A etc. le valide retour Imprimer par tiroir je choisi le tiroir D impression ok le tous fonctionne très bien le truc que je voudrais réaliser et le suivant quand je créer un emplacement avec un commentaire ( créer un exemple puis cliquer sur commentai...
25/01/2016 à 21:12aiglon74 LienJ'essaye demain merci pour ta réponse Cordialement aiglon74...
25/01/2016 à 18:45aiglon74 LienCe code fonctionne très bien a la maison '(ordi portable seule) en changeant le repertoire pour le boulot mon fichier n'est pas reconnu (Réseau) portant le bon chemin \\batfek.com\home$\gusi01\Mes Documents\Sylvain\Classeur Diamant Public Sub Ouvrir_Fichier() 'Ouvrir un fichier Excel depuis un autre...
23/01/2016 à 17:28aiglon74 Ouvrir un classur au choixMerci pour ta réponse sur la quelle j'ai flashé pour un autre problème mais voici la solution que je vais prendre cordialement aiglon74...