K

Membre fidèle

Inscrit le :13/09/2018
Dernière activité :22/03/2026 à 15:10
Version d'Excel :2013 FR
Messages
488
Votes
6
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par KTM - page 6

DateAuteur du sujetSujetExtrait du message
12/10/2019 à 16:18KTMFormule pour Remplir un tableauMERCI...
12/10/2019 à 13:45KTMFormule pour Remplir un tableauSur ma feuille Synthèse je voudrais récupérer des données sur la feuil 1 Quelle formule pour le faire rapidement ? Merci...
08/10/2019 à 09:18KTMUtiliser Listview sur Excel 2007Mon userform avec listview ne s'ouvre pas sur certaines versions excel . Comment remedier ? Merci...
17/09/2019 à 15:48KTMRÉcupÉrer le contenu de cellule dans une formeMerci...
17/09/2019 à 14:55KTMRÉcupÉrer le contenu de cellule dans une formeComment récupérer le contenu d'une cellule dans une forme excel? Merci...
30/08/2019 à 15:50KTMVerifier si C'est une date du moisMerci ça marche sur excel. En fait c'est du VBA que je voudrais C'est une condition que je Voudrais insérer dans un textbox. Merci...
30/08/2019 à 14:05KTMVerifier si C'est une date du moisJe voudrais un petit code pour verifier si une date est comprise entre le debut et la fin d'un mois donné Merci...
26/08/2019 à 21:04KTMControle Listview non VisibleMerci BrunoM45...
26/08/2019 à 15:33KTMControle Listview non VisibleJe suis confronté a une situation embarrassante Jai un fichier que j'ai conçu et qui marche bien sur mon pc ( Win 10, office 2016) Le soucis c'est que mon collègue qui a aussi ( win 10 ,office 2016 ) n'arrive pas a ouvrir le userform avec listview . Que faire? Merci...
18/08/2019 à 11:32KTMAnnuler Message de fermeture FichierJai attentivement lu les diverses réponses et je suis satisfait Merci a tous...
17/08/2019 à 20:49KTMAnnuler Message de fermeture FichierBon Tout le Monde J'ai un Fichier qui comporte plusieurs Feuilles et une feuille " Menu" Sur ma feuille "Menu" jai un bouton "Fermer Classeur" qui doit Fermer mon classeur Je voudrais que la fermeture du Classeur Passe forcement par ce bouton et non pas par la x de excel comme d'habitude j'ai ainsi...
17/08/2019 à 20:32KTMSheets("Feuil1").Activate et sheets("Feuil1").SelectBonjour, à première vue dans ce cas d'utilisation le résultat est sans doute le même. Par contre, il te sera possible de faire un Sheets.select pour selectionner toutes les feuilles ou Sheets(Array("Feuil1", "Feuil2", "Feuil3")).Select pour quelques unes ..... ce que Activate ne peut pas faire. Merc...
17/08/2019 à 20:31KTMSheets("Feuil1").Activate et sheets("Feuil1").SelectOK Merci...
16/08/2019 à 10:38KTMSheets("Feuil1").Activate et sheets("Feuil1").SelectJe voudrais savoir la difference entre sheets("Feuil1").Activate et sheets("Feuil1").Select...
16/08/2019 à 10:24KTMMacro pour Zoom PdfMerci...
14/08/2019 à 12:04KTMMacro pour Zoom PdfJ'utilise le Code suivant pour ouvrir depuis excel mon fichier PDF : ThisWorkbook.FollowHyperlink ThisWorkbook.Path & "\Aide Memoire.pdf" Je voudrais qu'il s'ouvre avec un Zoom prédéfini de 75 ou 100 sans que l'utilisateur ait à le faire manuellement Merci...
13/08/2019 à 09:40KTMChanger couleur cellule activeMerci...
13/08/2019 à 00:08KTMChanger couleur cellule activeIntéressant!!! Mais comment limiter a ma seule plage B5:B11 ...
12/08/2019 à 23:08KTMChanger couleur cellule activeMerci Beaucoup ça me convient...
12/08/2019 à 23:06KTMChanger couleur cellule activeSuper J'ai adapté et ça fonctionne Merci...
12/08/2019 à 20:44KTMChanger couleur cellule activeJai une plage de cellule B5:B11 j'aimerais faire un code qui va faire changer de couleur a la cellule sélectionnée et la ramener a la couleur initiale si on désélectionne. Merci...
12/08/2019 à 20:20KTMMasquer extension FichierMerci Jai finalement opté pour la méthode classique pour masquer les extensions: ...explorateur fichier……….Affichage...……….décocher extensions fichiers...
10/08/2019 à 18:46KTMMasquer extension FichierEst il possible de masquer les extensions des fichiers contenus dans un Dossier spécifique ...
09/08/2019 à 09:25KTMSuppression Dossiers via MacroOUI merci pour le tuyau...
09/08/2019 à 01:14KTMAssocier raccourci clavier a un bouton commandePuis-je savoir comment m'y prendre...
08/08/2019 à 11:38KTMSuppression Dossiers via MacroJai un fichier A et plusieurs sous dossiers contenus dans un meme dossier. je voudrais insérer une macro dans mon fichier A qui pourra supprimer tous les sous dossiers excepter les sous dossiers X et Y comment procéder ? Merci...
04/08/2019 à 13:57KTMAssocier raccourci clavier a un bouton commandeOui Merci j'ai trouvé Mon soucis à present: Dans Userform_Initialize j'ai mis ce code: Enregistrer. Accelerator = " E " Voici le Code dans "Enregistrer" Private Sub Enregistrer _Click If msgbox (" Voulez vous Enregistrer ",VbYesNo)=VbYes then Call MySave End If Je voudrais avec un raccourcis clavier...
04/08/2019 à 12:41KTMAssocier raccourci clavier a un bouton commandeJ"aimerais savoir comment Associer un raccourci clavier a mes boutons "enregistrer" ou "annuler" presents sur mon Userform Merci...
29/07/2019 à 12:39KTMRendre dossier insupprimableJ'ai un dossier A Qui contient un fichier x et un sous dossier A1 qui collecte des données du fichier x J'aimerais rendre le sous dossier A1 impossible à supprimer sinon par mot de passe par l'utilisateur. Si cela est possible comment procéder ? Merci...
23/07/2019 à 20:38KTMProbleme avec Combobox.changeMerci Voici Ce que ca donne Private Sub ComboBox1_Change() Dim i As Integer Dim Item As Variant If flag = 1 Then flag = 0: Exit Sub listview.ListView1.ListItems.Clear If Cells(Application.Rows.Count, "A").End(xlUp).Row = 2 Then listview.ComboBox1.AddItem Cells(2, 1) Set Item = listview.ListView1.Lis...
23/07/2019 à 17:28KTMProbleme avec Combobox.changeJai un soucis avec mon code dans l'évènement combobox1. Change Avec un seul enregistrement dans ma base mon code ci dessous renvoie une erreur Private Sub ComboBox1_Change() Dim i As Integer Dim Item As Variant If flag = 1 Then flag = 0: Exit Sub listview.ListView1.ListItems.Clear Set f = Sheets("Gr...
23/07/2019 à 10:58KTMProbleme ouverture UserformPrivate Sub ComboBox1_Change() Dim i As Integer Dim Item As Variant If flag = 1 Then flag = 0: Exit Sub listview.ListView1.ListItems.Clear Set f = Sheets("Grille_de_Dispensation") a = Range(f.[A2], f.[A65000].End(xlUp)) For i = LBound(a) To UBound(a) If a(i, 1) = ComboBox1 Then listv...
23/07/2019 à 10:09KTMProbleme ouverture UserformMerci Mais un dernier detail reste au niveau de Combobox1.Change Il ya erreur quand on choisi l'element Merci pour Tout...
23/07/2019 à 09:06KTMProbleme ouverture UserformJe voudrais que vous aidiez a comprendre un phénomène. Mon userform refuse de se lancer si ma base de données contient un seul enregistrement Mais au delà de deux enregistrements pas de problème. Je pense que j'ai mal écrit un code quelque part. Merci...
23/07/2019 à 08:58KTMAffichage de listBoxMerci C'est reglé...
22/07/2019 à 13:31KTMAffichage de listBoxJ'ai un ListBox multicolonnes incorporé dans un Userform et tout ceci élaboré sur mon PC Portable. Le problème est que le meme userform s'ouvre sur mon Bureautique de resolution différente mais mon listbox s'affiche avec des colonnes décalées. Comment y remédier ...
20/07/2019 à 13:43KTMControler si listView est videC'est cela Merci...
20/07/2019 à 10:45KTMControler si listView est videJ'aimerais lancer une action au double click sur un item de ma listview . j'ai procédé comme suit mais une erreur me revient: Private Sub ListView1_DblClick() If ListView1.Items.Count = 0 Then Exit Sub flag = 1 With ListView1 ligne = .SelectedItem.ListSubItems(10) Me.TextBox1 = .SelectedItem Me.Comb...
20/07/2019 à 10:40KTMFormater ListViewC'est gentil Merci...
19/07/2019 à 16:06KTMFormater ListViewJe voudrais formater ma listview comme suit Mettre ma colonne "Mois" dans le meme format que ma plage Centrer les Données dans les colonnes "ID" et "Montant" Merci...
11/07/2019 à 16:46KTMMettre Text Combobox en RougeJ'ai une Combobox qui doit prendre "Oui" ou "Non" Je voudrais que "Oui" apparait en Rouge Foncé Comment paramétrer ma combobox ? Merci...
02/07/2019 à 11:50KTMArgument ou appel de procedure incorrectMerci J'ai essayé mais le problème persiste...
02/07/2019 à 10:34KTMArgument ou appel de procedure incorrectJ'ai elaboré une macro qui doit faire les actions suivantes: 1- Sélectionner les plages spécifiques et les copier sur la feuille "Impr" 2- Créer un sous Dossier "Files Actives" 3- Sauvegarder au Format "pdf " dans le sous dossier Les étapes 1 ET 2 fonctionnent normalement Mais la 3e pose problème et...
21/06/2019 à 21:19KTMParametrage msgboxMerci je teste et je vous reviens...
21/06/2019 à 21:07KTMParametrage msgboxJ'ai joins un fichier pour illustrer ma preoccupation...
21/06/2019 à 18:07KTMParametrage msgboxMERCI PEDRO22 Le soucis c'est quand dans la boite de dialogue on doit répondre "NON"...
21/06/2019 à 17:01KTMParametrage msgboxJ'ai un soucis avec ma macro Aidez moi à bien la rédiger. Merci...
05/06/2019 à 21:01KTMUserForm_InitializeMerci à tous pour le coup de main...
05/06/2019 à 20:18KTMUserForm_InitializeJe n'arrive pas à executer Userform1.Show et je reçois un message d'erreur Erreur d'execution '380' Impossible de définir la propriété Value. Valeur de propriété non valide. Apres tâtonnement je me rends compte que la ligne de code : ListBox1 = Range("Q1").Value inséré dans UserForm_Initialize en es...
04/06/2019 à 07:30KTMDerniere cellule non vide d'une colonneMerci a tous pour le soutient Mille excuses pour le retard...