C

Membre fidèle

Inscrit le :18/05/2012
Dernière activité :16/02/2020 à 16:00
Version d'Excel :1997
Messages
205
Votes
8
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par Civo - page 4

DateAuteur du sujetSujetExtrait du message
22/07/2014 à 09:09KGT71Macro VBA combobox reliée à textboxManque le fichier Cdlt...
22/07/2014 à 09:01anaxagore Supprimer libgne sur cellule non videCdlt...
21/07/2014 à 09:43ateppaz Tester si un nombre existe entre deux autresC'est pas très clair ( enfin pour moi ) (: Ton chiffre est saisi où ? Tes références sources sont disposées comment dans ton tableau ? Si tu as la possibilité de mettre un fichier ... Cdlt...
19/07/2014 à 11:22BastLat Largeur de colonnesTout à fait !! Mais il faut tout prendre en compte, l'épaisseur des bandeaux etc ... J'ai lu il y a quelques temps déjà un article détaillant les retranchements à faire etc ... Si je remets la main dessus je n'hésiterai pas à te le faire parvenir (: Cdlt...
19/07/2014 à 10:55julienjousseMACRO VBA - ENREGISTRER EN PDF + MAIL -D'UN TABLEAU SPECCdlt...
18/07/2014 à 19:08julienjousseMACRO VBA - ENREGISTRER EN PDF + MAIL -D'UN TABLEAU SPECCdlt...
18/07/2014 à 13:46BastLat Largeur de colonnesParce que moi quand je le teste je n'ai que la case D en "trop" et en remplaçant lCol = ((Application.UsableWidth - 47) / 2) / 6 puisque Application.usablewitch est en pixels mais bon le résultat est le même et ceux sur deux écrans différents avec deux résolutions différentes (: et avec lCol = ((App...
18/07/2014 à 12:02BastLat Largeur de colonnesBen ça fonctionne (...
18/07/2014 à 10:12BastLat Largeur de colonnesMa question va te paraître stupide, mais quel est ton espace de travail ? parce que je ne comprends pas trop ce que tu veux faire ... Tu dis vouloir travailler sur trois colonnes en ayant déjà défini la première et que les deux autres sont partagées à parts égales donc je vois pas trop où est le pro...
18/07/2014 à 09:5200Vincent00 Controle sur les dates VBAPrivate Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If CDate(TextBox1.Value) > Range("Feuil1!A1").Value And CDate(TextBox1.Value) < Range("Feuil1!A2").Value Then 'compris dans la plage de date Else 'non compris dans la plage MsgBox "Ton message" End If End Sub J'ai pas testé, mais...
18/07/2014 à 07:02christian53 Protection de cellulesIl y a beaucoup de cellules ? Cdlt...
17/07/2014 à 14:1600Vincent00 Controle sur les dates VBAJ'ai bien compris, mais pour voir si la date et comprise entre, il faut bien deux autres données non ? Donc ma question est où sont les deux autres puisque la troisième c'est la date inscrite dans celle du textbox (: quelle colonne ? quelle cellule ? Cdlt...
17/07/2014 à 12:43Franchise13thTrouver dans une liste les mots d'une autre listeOui ou l'inverse est vrai aussi (...
17/07/2014 à 12:19Kant1Empêcher fermeture UserFormPuisque ton classeur est confidentiel colle ton code on verra peut-être le problème ... ou pas (: Cdlt...
17/07/2014 à 12:12Kant1Empêcher fermeture UserFormTu n'as pas un unload qui traine ...
17/07/2014 à 11:59Kant1Empêcher fermeture UserFormTu peux joindre ton fichier ? Cdlt...
17/07/2014 à 11:53Franchise13thTrouver dans une liste les mots d'une autre listeAvec cette formule peut-être =SI(ESTNUM(TROUVE(B2;A2;1));STXT(A2;TROUVE(B2;A2;1);NBCAR(B2));"") @+...
17/07/2014 à 11:2400Vincent00 Controle sur les dates VBAAvec un fichier ce serai mieux pour comprendre et t'aider (: Cdlt...
17/07/2014 à 11:14Mathilde81Probleme somme automatiqueLa case A17 est cachée (...
17/07/2014 à 11:05Nelly31 Alarme dates butoiresUn truc dans ce genre là ? Cdlt...
17/07/2014 à 09:41reinruof77 Supprimer une ligne avec userformRe, ton fichier en retour avec date, kilométrage et nom. J'ai ajouter un bouton supprimer, les trois champs sont obligatoires pour la suppression. @+...
16/07/2014 à 13:12MadjerSOUS.TOTAL TexteAvec un NB.SI peut-être Cdlt...
16/07/2014 à 11:20Floo73Déplacer une ligne dans une autre feuille après saisieSi j'ai bien compris, i = ta ligne active...
16/07/2014 à 10:41kurapiika Problème de formatOu alors: Sub test() valeur = Range("A1").Value MsgBox Format(valeur, "###0.00") End Sub Cdlt...
16/07/2014 à 08:50Clemz43Problème d'affichageSur le png fourni l'option fractionner est sélectionné est-ce normal ? Si oui je ne vois pas .....
16/07/2014 à 06:24Floo73Déplacer une ligne dans une autre feuille après saisieComme ça par exemple Sheets("TA FEUILLE").Rows(TA REFERENCE AU NUMERO DE LIGNE).Delete Shift:=xlUp cdlt...
16/07/2014 à 06:06eric89 Cellule qui déclenche l'ouverture d'un fichierEssai ça : Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range Dim wb As Workbook Dim ws As Worksheet Set KeyCells = Range("TA CELLULE") If Not Application.Intersect(KeyCells, Range(Target.Address)) _ Is Nothing Then Set wb = Workbooks.Open("C:\ICI LE CHEMIN DU FICHIER") Set ws...
15/07/2014 à 19:42coco6728Insérer une imageUne piste : .HTMLBody = "blablabla " & vbCrLf & "<img src=C:\ CHEMIN DE TON FICHIER IMAGE>"...
15/07/2014 à 13:59MaxWellSend mail VBAJe te l'ai envoyé en MP...
15/07/2014 à 12:14MaxWellSend mail VBAOui tu peux (...
15/07/2014 à 11:10eric89 Cellule qui déclenche l'ouverture d'un fichierCode à placer dans VBA sur ta feuille (...
15/07/2014 à 10:32MaxWellSend mail VBASub Feuil1_Bouton1_Cliquer() With Sheets("feuil1").Activate Dim cellule As Range For Each cellule In Range("A3:K60000") If cellule <> "" Then cellule.Borders.Weight = xlThin Next 'on crée le fichier PDFdans le même dossier que le fichier source Sheets("Feuil4").ExportAsFixedFormat Type:=xlType...
15/07/2014 à 10:07eric89 Cellule qui déclenche l'ouverture d'un fichierTu entends quoi par fichier ? Une autre feuille? un autre classeur ? Cdlt...
12/07/2014 à 13:17Civo Recupération numéro ligne cellule activeC'est bon j'ai trouvé en rajoutant ces lignes de code à la suite: Cel.Select Ligne = ActiveCell.Row Label1 = Ligne...
12/07/2014 à 12:29Civo Recupération numéro ligne cellule activeJ'ai ce code pour rechercher une ligne de valeur selon 3 textbox's, ça fonctionne mais serait-il possible d'activer la cellule contenant le résultat de la recherche afin d'en récupérer le numéro de ligne ? Set Cel = .Columns("M").Find(what:=Me.NE & Me.TDS & Me.NP, LookIn:=xlValues, lookat:=xlWhole)...
10/07/2014 à 12:11CivoProblème de rechercheHa oui .. ( pardon ) MDP Admin Utilisateurs Admin...
10/07/2014 à 12:03CivoProblème de rechercheJe suis confronté à un problème qui me dépasse ... J'ai un tableau renseigné par des textbox's, rien de sorcier ... J'ai un USF avec un bouton rechercher codé comme suit : Private Sub CommandButton1_Click() Dim lastLine As Long Dim i As Long With Sheets("Feuil2") lastLine = .Range("A3").End(xlDown)...
09/07/2014 à 12:09ChipmunkFusion de donnée de 3 colonnesPrivate Sub Worksheet_SelectionChange(ByVal Target As Range) With Sheets("Feuil1") nblg = .Range("A" & Rows.Count).End(xlUp).Row With .Range("G2:g" & nblg) .Formula = "=C2&E2&F2" .Value = .Value End With End With End Sub Code à placer dans ta feuille 1...
09/07/2014 à 10:48Nans Remplissage case double clicBon si ça plante c'est que tu ne déverrouilles pas bien ta colonne, rappel : Selection de la colonne, clique droit, format de cellule, protection et décocher vérouillée. Sinon : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim couleur As Long Activesheet.Unprotec...
09/07/2014 à 10:04Nans Remplissage case double clicProtège ta feuille sans la colonne dans laquelle tu cliques dessus sinon ActiveSheet.Unprotect pour enlever la protection tu sauras la remettre je pense (: @+...
09/07/2014 à 08:50reinruof77 Supprimer une ligne avec userformSur quels critères tu veux supprimer la ligne ?? J'ai réalisé quelques saisies avec ton usf, mais en aucun cas tu ne stocke ton numéro de plaque. Si j'ai bien compris ton idée, il faudrait que tu rajoutes une colonne avec le numéro de plaque ensuite par rapport rapport à celui-ci tu affiches les don...
26/06/2014 à 11:32Civo Problème workbook_openMerci ^^...
26/06/2014 à 09:35Civo Problème workbook_openJe reviens vers vous pour un problème à l'ouverture du classeur. J'ai en colonne G une date, résultat d'une formule d'ajout de date fait en VBA et renseignée par un USF. Je voudrais qu'à l'ouverture du classeur les dates dépassées à la date d'aujourd'hui deviennent rouge et les autres vertes. J'ai d...
26/06/2014 à 09:21Civo Macro modification ligne entièreMerci beaucoup ( avec du retard )...
20/06/2014 à 08:04Civo Macro modification ligne entièreMerci de t'être penché sur le sujet . La solution proposée ne fonctionne malheureusement pas je m'explique, il n'y aura forcément pas qu'un enregistrement, dans l'usf 2, je donne la possibilité de rechercher un produit par numéro de lot en cliquant sur valider, les caractéristiques s'affichent dans...
19/06/2014 à 09:37Civo Macro modification ligne entièreJe rencontre un gros problème ( qui pour vous sera sûrement moindre ), je vais essayer d'être le plus clair possible : Je répertorie dans un tableau des données concernant des produits que je rempli à l'aide d'un USF ( jusqu'ici tout va bien ) J'ai un deuxième USF qui me cherche un produit avec ses...
27/06/2012 à 13:06CivoPetit problème enregistrementMerci Dan, En fait je veux enregistrer en format pdf les données de A1 à I33 avec comme nom de fichier les données présentent dans H3-F7-F3 . Avec ce code cela s'enregistre comme je veux mais il va enregistrer le fichier pdf dans " mes documents" au lieu de " C:\Devis\Fichiers"...
27/06/2012 à 10:44CivoPetit problème enregistrementVoilà j'ai une macro qui est censée m'enregistrer un document dans un dossier prècis, mais lorsque je la lance elle m'enregistre le fichier dans mes documents. Private Sub Enreg_Pdf() Dim zoneEnregistree As Range, dossierSauvegarde$, nomFichier$ With ThisWorkbook.Sheets("Feuil1") Set zoneEnregistree...
13/06/2012 à 18:46CivoEnregistrementOui le supprimer du disque dur . Pour la trois j'ai pensé à faire un userform où on mettrais le nom du fichier et ça l'ouvrirai automatiquent . Merci...
13/06/2012 à 17:28CivoEnregistrementJe progresse en VBA si si je vous assure . Ma question est la suivante enfin plusieurs questions en fait : La première : Est-il possible d'enregistrer un fichier .xls sans les macros et boutons apparant dans la feuille ?. La deuxième : Est-il possible d'enregistrer un fichier et de le détruire après...