| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 16/05/2024 à 10:01 | sat3367 | Probleme de memoire Excel | Exemples de macro utilisé en permanence Enregistrement automatique toute les 5 minutes Comparaison de l heure inscrite dans une cellule avec heure système toute les minutes puis en fonction couleur d une cellule en vba... |
| 15/05/2024 à 13:45 | sat3367 | Probleme de memoire Excel | J ai un fichier excel avec environ une 15 aine d instruction VBA en automatique Depuis 3-4 jours ce fichier tourne en boucle et sature la memoire ordi et le processeur 30% processeur 50 % memoire ce qui oblige de quitter le programme avec le gestionnaire de tache comment avoir une macro pour vider l... |
| 03/04/2023 à 13:47 | sat3367 | Compteur de clic | Le code fonctionne... |
| 03/04/2023 à 11:02 | sat3367 | Compteur de clic | En cliquant sur ma box je n ai pas la macro qui s affiche Ma macro est affecté a ma box 1 clic box = nombre dans la cellule +1 Sub CommandButton1_Click() Range("j15") = Range("j15") + 1 End Sub merci de l aide... |
| 19/05/2022 à 18:38 | sat3367 | Comparaison de date par rapport a aujourdhui | Merci j essaye demain... |
| 19/05/2022 à 16:11 | sat3367 | Comparaison de date par rapport a aujourdhui | Je ne comprends pas pourquoi le 2 eme evenement ne fonctionne pas j ai mes lignes qui se remplisse en vert et non la premiere en vert et la deuxieme en gris Sub couleurdate() Dim i, j, k, l, m, n As Integer With Worksheets("Feuil1") Dim thisDate As String thisDate = Format$(Date, "dd/mm/yyyy") '---... |
| 13/05/2022 à 11:32 | sat3367 | Simplification de formule | Probleme resolu Cells(i, "a").Interior.Color = RGB(211, 211, 211) Range("b" & i).MergeArea.Interior.Color = RGB(211, 211, 211)... |
| 13/05/2022 à 11:17 | sat3367 | Simplification de formule | En fait j aimerai toute la ligne i de A a C sachant que BC sont fusionnées... |
| 13/05/2022 à 11:05 | sat3367 | Simplification de formule | Comment simplifier cette commande vba merci Dim i, a, b, c As Integer With Worksheets("Feuil1") Dim thisDate As String thisDate = Format$(Date, "dd/mm/yyyy") For i = 7 To 9 If Cells(i, "j") > thisDate And Cells(i, "j") <> "" Then Cells(i, "a").Interior.Color = RGB(128, 255, 128) Cells(i, "b... |
| 06/05/2022 à 10:52 | sat3367 | Copie donnees de la derniere feuille | Resolu mes cellules F1:F2 etait des calculs... |
| 05/05/2022 à 17:06 | sat3367 | Copie donnees de la derniere feuille | Tous les jours j ai une nouvelle feuille 01/05 02/05 03/05 04/05 etc comment copier la cellule f1:f2 de la dernière feuille de chaque jour dans la feuille produit g1:g2 j ai essaye ceci Sheets(Sheets.Count).Select j ai essaye aussi Sheets(Sheets.Count).activate Range("F1:F2").Copy _ Destination:=Wor... |
| 23/11/2021 à 10:11 | sat3367 | Creation de nouveau nom de feuille | C est parfait un grand merci... |
| 22/11/2021 à 18:38 | sat3367 | Creation de nouveau nom de feuille | J aimerai quand je clique sur inserer une nouvelle feuille de calcul il me nomme cette feuille a la date +1 de la feuille precedente exemple feuille 1 date 22/11 je clique sur inserer une nouvelle feuille et la la feuille se nomme 23/11 etc merci... |
| 07/05/2021 à 14:48 | sat3367 | Car DD a 100 % avec boucle horaire | Merci je vais essayer... |
| 07/05/2021 à 10:03 | sat3367 | Car DD a 100 % avec boucle horaire | En fait je veux les 2 conditions Une donnée modifiée dans le range ou une comparaison toutes les minutes... |
| 07/05/2021 à 08:52 | sat3367 | Car DD a 100 % avec boucle horaire | En fait c est quand une donnee est modifiee dans la range y21 AD39 que graph est appellee si je mets un false cela ne compare plus la fonction graph avec l heure systeme... |
| 06/05/2021 à 15:32 | sat3367 | Car DD a 100 % avec boucle horaire | Bonjour mon fichier fonctionne Au bout d un certain temps environ 30 minutes le DD est a 100 % et bloque l ordinateur Le soucis vient de la comparaison des heures par rapport a l'heure system. Fonction graph module 2 J ai essaye de limiter l utilisation des processeurs a 2/4 mais ca ne marche pas. Q... |
| 01/04/2021 à 13:26 | bastien12 | Copier des lignes | Excuse moi je ne comprends pas ce que tu veux faire sur ta feuill 2... |
| 31/03/2021 à 09:01 | sat3367 | Probleme de processeur avec mon fichier Excel VBA | Donc probleme un autre probleme peut etre lié quand je veux fermer ce classeur pas de soucis quand il est seul quand il y a 2 classeurs ouverts je ne peux pas ferme ce classeur activite quotidienne je ferme l autre en premier et ensuite activite le probleme ne vient pas du processeur mais du disque... |
| 31/03/2021 à 08:59 | sat3367 | Probleme de processeur avec mon fichier Excel VBA | Ce controle est pour la mise a jour de heure system macro majh dans module 4 ca ca marche en revanche feuille activite Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("Y21:AD39")) Is Nothing Then Call graph Else: Application.OnTime Now + TimeValue("... |
| 30/03/2021 à 16:18 | sat3367 | Probleme de processeur avec mon fichier Excel VBA | Dans mon fichier excel j utilise l heure systeme et je fais une comparaison avec cette heure toutes les minutes le processeur a ce moment la est a 12-20 % apres 10 minutes j ai le processeur a 50-60% et cela me bloque mon fichier sablier en permanence quelqu un a t il une solution en dehors de faire... |
| 24/03/2021 à 15:56 | sat3367 | Probleme de code | Encore un soucis cela ne se passe que quand j ouvre un 2 eme fichier j essaye de fermer ce projet activite quotidienne et ca ne le ferme pas la boucle doit continuer derriere comment arreter la boucle quand je ferme... |
| 24/03/2021 à 15:48 | sat3367 | Probleme de code | J ai trouve pour ceux que cela interresse dans activité Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("Y21:AD39")) Is Nothing Then Call graph Else: Application.OnTime Now + TimeValue("00:01:00"), "graph" End If End Sub... |
| 24/03/2021 à 15:11 | sat3367 | Probleme de code | Ca ne fonctionne pas avec l intersect et les 2 lignes de code j ai remis sur activite Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("Y21:AD39")) Is Nothing Then Call graph End If Application.OnTime Now + TimeValue("00:01:00"), "graph" End Sub... |
| 24/03/2021 à 13:04 | Edouard 1987 | Nom et prénoms dans cellules différentes | Il te faut extraire les prenoms et les comparer a une range de 2 cellules ou il y aura prenom et nom quid de 2 prenoms identiques... |
| 24/03/2021 à 13:02 | sat3367 | Probleme de code | Merci de t avoir penché sur mon projet car beaucoup de code entre l extraction des donnees, une autre extraction, le calcul d heure et j en passe Pour te répondre ce qui doit déclencher le chrono et l'exécution de la macro "graph" est l'ouverture du classeur worksheet si l on change d'onglet le refr... |
| 24/03/2021 à 12:55 | Mamaj | Copier des données automatiquement d'une feuille à une autre | Un seul fichier avec plusieurs onglet est plus judicieux quitte a ouvrir chaque onglet par mot de passe pour n avoir que l onglet correspondant avec la personne... |
| 24/03/2021 à 11:33 | sat3367 | Probleme de code | Mon projet fonctionne mais des que je veux y integrer une boucle horaire ca ne veut plus fonctionner dans activite le bouton 5 est juste la pour verifier que la macro graph fonctionnne ,ca marche le but est que la fonction graph soit automatiquement lancée toute les 1 minute e... |
| 17/03/2021 à 19:13 | sat3367 | Verification de commande | Merci beaucoup ,ca ne fonctionnait pas encore mais j ai trouve pourquoi l'heure systeme est un nombre avec la date + heure mes heures n'etaient que heure j ai rajoute la date pour avoir un nombre et cela fonctionne parfaitement j integre ceci demain dans ma feuille d origine merci encore sujet clos... |
| 17/03/2021 à 13:38 | sat3367 | Verification de commande | Bon ca ne fonctionne pas grrrrrrrrrrrrrrrrrrrrr... |
| 17/03/2021 à 11:55 | sat3367 | Verification de commande | Si on écrit pour la cellule c52. .cells("c52") c est possible où il faut écrire .cells(52,"c")... |
| 17/03/2021 à 11:23 | sat3367 | Verification de commande | Merci c etait tout bete la macro fonctionne mais ne fait rien donc j explique ce que je veux dans la feuille "graphique" en r51 j ai l heure systeme appelée par une macro en c 57 cellule vide qui peut etre remplie en c56 11:10 (heure) en c55 12:10 en c54 13:10 si c57< r51 alors celulle sur feuill... |
| 17/03/2021 à 09:51 | sat3367 | Verification de commande | Je ne comprends pas pourquoi excel me demande une attendu a la fin de end sub Sub heure() Dim h, i As Integer With Worksheets("graphique") For h = 57 To 51 If .Cells("C", h) < .Cells("r", 51) Then ThisWorkbook.Worksheets("activite").Cells("b12").Interior.Color = RGB(128, 255, 128) Else ThisWorkbo... |
| 15/03/2021 à 20:09 | sat3367 | Affichage liste en couleur | La mfc ne fonctionne pas car si on prend un autre nom il apparait en rouge aussi La MFC ne prend en compte l autre horaire de john... |
| 15/03/2021 à 18:07 | sat3367 | Affichage liste en couleur | Mon projet se finalise grace a vous J aimerai colorier dans ma liste deroulante le nom d une personne en fonction d une autre cellule Je m explique dans mon fichier nous avons sarah qui finit a 10:15 tant qu'il ne sera pas 10:30 (feuille 1 L10 J10) j aimerai que son nom apparaisse en rouge le problè... |
| 03/03/2021 à 13:29 | sat3367 | Bloquer une cellule | Super merci pour la formule le soucis est toujours le meme avec ma fonction graph qui fait une boucle quand je la lance on a A B C 1 test 1310 1410 2 test1 1340 1450 donc B1=1310 ou maintenant 13:10 avec la fonction c1 1410 B2 =1340 c2 1450 quand je copie dans une autre feuille exemple x =feuille!B1... |
| 02/03/2021 à 15:00 | sat3367 | Bloquer une cellule | Dans mon fichier excel j extrait des donnees horaires du style 1310 dans une autre feuille , avec une boucle que voici Sub graph() If ActiveSheet.Name <> "Activité" Then Exit Sub Const msg1 As String * 20 = "Aucune donnée copiée" Const msg2 As String * 27 = "Copie des données effectuée" Dim FX... |
| 26/02/2021 à 10:39 | sat3367 | Graphique Excel | Merci c est exactement ce qu il me fallait maintenant je vais essayer de comprendre... |
| 26/02/2021 à 09:43 | sat3367 | Graphique Excel | ... |
| 26/02/2021 à 09:39 | sat3367 | Graphique Excel | 1er point resolu la barre de temps pas le reste... |
| 26/02/2021 à 09:34 | sat3367 | Graphique Excel | Je decouvre les graphiques d excel et malheureusement je n arrive pas a comprendre comment faire j ai dans une colonne A des noms dans la colonne B des heures de debut et dans la colonne C des heures de fin dans la colonne D des heures de debut et dans la colonne E des heures de fin J aimerai avoir... |
| 17/05/2019 à 09:16 | sat3367 | Mail personalise | J etais avec Outlook 2010 et ca envoyé le mail juste a CC ,ca ne prenait pas en compte la colonne K maintenant passage sur excel 2016 et Outlook 2016 et meme probleme je recois sur test.com en CC rappel du code colonne H "RDV A PRENDRE" ou rien colonne L vide ou "OK" Colonne K liste d adresse email... |
| 03/05/2019 à 13:42 | Orizhial | Macro pour couleur de fond de ligne selon certaines conditions | Une mise en forme conditionnelle avec valeur de cellule vide remplissage rouge... |
| 03/05/2019 à 13:39 | Renaud Dugas | Tri de données dans 3 tableaux | Je viens de voir ton tableau pourquoi ne pas mettre tout sur la meme feuille de A9 a Axxx puis de creer un clic bouton avec le tri apres ton tri tu veux le faire sur quelle colonne description,poids,prix....etc... |
| 03/05/2019 à 13:30 | sat3367 | Mail personalise | La fonction envoi mail fonctionne With Outmail .To = cell.Value .CC = "xxxxx@mail.com" .Subject = "Rappel : Aptitude médicale arrive à échéance" paragraphe = "" paragraphe = paragraphe & "<HEAD>" & Chr(13) paragraphe = paragraphe & "<BODY>" & Chr(13) '************************************... |
| 03/05/2019 à 10:27 | sat3367 | Mail personalise | Cela fonctionne cela envoi le mail sauf que cela n indique pas de mail en cell.value cela devrait prendre l adresse mail en I... |
| 02/05/2019 à 11:13 | sat3367 | Mail personalise | Desole ca ne fonctionne pas le code est bon ... |
| 02/05/2019 à 10:48 | sat3367 | Mail personalise | Cela me marque un autre programme utilise Outlook veuillez quitter Outlook la macro ne veut pas s executer ou s execute mais je ne sais pas il faudrait que je puisse inserer un "ok" pour savoir si cela marche... |
| 02/05/2019 à 10:48 | sat3367 | Mail personalise | Cela me marque un autre programme utilise Outlook veuillez quitter Outlook la macro ne veut pas s executer ou s execute mais je ne sais pas il faudrait que je puisse inserer un "ok" pour savoir si cela marche... |
| 02/05/2019 à 10:40 | sat3367 | Mail personalise | Voila mon probleme j ai en colone F une condition ok ou RDV A PRENDRE si F = RDV A PRENDRE et colone H vide alors quand je clique sur sur envoi mail (boite de dialogue) alors envoi un mail aux destinataires de la colone I ca ne fonctionne pas car Outlook occupe de plus j aimerai inscrire un fois le... |