Membre fidèle

Inscrit le :05/11/2011
Dernière activité :04/02/2024 à 16:10
Version d'Excel :2003FR,2010FR
Messages
279
Votes
24
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par patrick33 - page 5

DateAuteur du sujetSujetExtrait du message
27/06/2012 à 21:01reevhalAide pour une formuleMerci Raja pour les explications...
27/06/2012 à 18:40vince_unincDiagramme de Gantt représentant un assemblage de composanteBonjour Vince-uninc, solution facile (surtout que je ne suis pas un expert Excel ou VBA), va sur le site de Office.Microsoft avec le lien suivant: http://office.microsoft.com/fr-fr/outlook-help/presenter-vos-donnees-dans-un-diagramme-de-gantt-dans-excel-HA010238253.aspx Cela ne répondra pas forcemme...
27/06/2012 à 18:28reevhalAide pour une formuleVoilà pour le troisième palier sur le même principe que la formule déjà donnée: =SI(A1<250;0;SI(A1<600;15;SI(A1<1200;30;45))) Raja, ta formule ne fonctionne pas, je ne comprends pas le principe. Explication possible ? Cordialement...
26/06/2012 à 22:38tutorblyMoyenne même cellule différentes pages de même fichierMerci, cela affranchi de toute condition pour l'insertion des feuilles. Mais la formule a le mérite d'être simple. @ +...
26/06/2012 à 22:23tutorblyMoyenne même cellule différentes pages de même fichierUn essai. Cordialement...
26/06/2012 à 21:52reevhalAide pour une formuleEssaie =SI(A1<250;0;SI(A1<600;15;25)) en supposant que ton calcul de pods s'eefectue en A Cordialement...
21/06/2012 à 19:22friseb Tion d'équation / calcul de tauxJuste pour le fun calcul de t (voir fichier joint) Cordialement...
21/06/2012 à 18:54Fabian123Subdiviser l'axe des ordonnéesPar (ma petite) expériencesur cde forum, pour espérer avoir une réponse, mieux vaut fournir un fichier exemple. Cordialement...
21/06/2012 à 18:35lolo34140Macro lente et problème codeJe ne suis pas un spécialiste en VBA comme certains sur ce forum. Mais as-tu essayé "Application.ScreenUpdating = False" en début de macro ce qui évite le rafraichissement d'écran. J'ai réalisée une macro (à l'aide du forum) relativement longue et sur un même fichier, le temps de traitement s'est ré...
20/06/2012 à 16:25Vinz02Calculs sous conditionsRegardez si cela réponds à votre demande (macro calcul) J'ai "traduit" les lignes de calculs en VBA, mais sur la couleur "bleu" je n'ai pas les mêmes résultats que vous . A vérifier. Cordialement...
20/06/2012 à 16:08patrick33 Format nombreMerci pour la petite astuce et pour le format. Cordialement...
17/06/2012 à 16:29tommylee62000AméliorationRegarde si cela peut te convenir. Cordialement...
17/06/2012 à 11:12Olivier de StQ Lier plusieurs cellules à une seuleUn petit fichier exemple est toujours le bienvenue. Tu aura plus de chance d'avoir des réponses correspondant à ta demande. Cordialement...
16/06/2012 à 09:28tommylee62000 Quelle formule ?Regarde si cela convient à ta demande. Vérifie le calcul de la moyenne pondérée en L1. Sur la ligne 2, j'ai fais apparaitre pour le calcul des pondérations. Tu pourra les modifier à souhait. T upeut la masquer si tu ne veux pas qu'elle apparaisse. Cordialement...
04/06/2012 à 18:53amouralleMise en forme conditionnelle 3 valeurs 3 conditionsIl est clair qu'un petit fichier serai le bienvenue en attendant sa mise en ligne, tu peux essayer ceci dans la/les cellules dont tu veux changer la couleur: condition 1 "la formule est" =ET((A1=6);(B?*C?*D?<4.8)) condition 2 "la formule est" =ET((A1=5);(B?*C?*D?<4.1)) condition 3 "la formule...
02/06/2012 à 07:11SébastienCréez un avatar à votre image en quelques minutesSympa le site. Merci...
02/06/2012 à 06:38maerynn Mise en forme conditionnelle un peu complexeBonjour ; dans la mise en forme conditionnelle; Condition 1 "la formule est =SOMME(D4:D5)>D18 " (avec somme tu pourra étendre ta plage de calcul, sinon tu mets simlement D4+D5) et tu modifie ton format...
31/05/2012 à 21:56CAPUCIN Eliminer la barre de menu "feuille de calcul"Bonsor, essaie ceci dans "Thiswookbook": Private Sub Workbook_Open() Application.CommandBars(1).Enabled = False Application.DisplayFullScreen = False End Sub SI Application.DisplayFullScreen =true on supprime aussi tout, mais pas forcemment interessant. A voir Cordialement...
27/05/2012 à 19:14mc3199PlanningCi-joint ficher avec modif sur les dates. J'ai juste modifier le format des cellules pour pouvoir paramétrer les autres cellules. Tu modifies A5, les autres se modifient en conséquence. Pour le défilement, je ne crois pas que cela soit possible. Cordialement...
26/05/2012 à 05:57Malezor Retranscrire sous ExcelJ'ai retranscrit ta formule var t = (24*3600 * ((1-Math.exp(-(Math.sqrt(Math.pow(Math.abs(x1-x0),2)+Math.pow(Math.abs(y1-y0),2)))/350))*7.375*Math.pow(0.9,va))); en remplaçant: Math.exp par EXP Math.sqrt par RACINE Math.abs par ABS Math.pow par PUISSANCE et en remplaçant x1,x0..... par des cellules...
25/05/2012 à 17:46Nyre Macro appliquée à toutes les feuilles sauf la dernièreDésolé pour les explications en français, j'aurais peut-être dû t'écrire le code mais ketamacanna l'a fait pour moi. Et puis je trouve plus formateur de réfléchir par soi-même que d'avoir les solutions toute faite @+...
24/05/2012 à 17:43Nyre Macro appliquée à toutes les feuilles sauf la dernièreSi tu compte le nombre de feuille avec Worksheets.Count. Plutot que d'effectuer une boucle sur toutes les feuilles du classeur, tu pourrai boucler sur i= Worksheets.Count - 1 , ainsi tu ne prends pas en compte la dernière feuille. Cordialement...
23/05/2012 à 18:05weirdmaxCalcul auto de remise total par rapport a diverses promotionSi tu peux donner un fichier, tu auras plus de chance d'avoir de solutions répondant à ta demande. Cordialement...
22/05/2012 à 18:26MANOUNE Conversion nb heures en centièmesVoir fichier joint. En colonne G, tu multiplie tes totaux par 24. Le format de la colonne est en nombre avec 2 chiffre après la virgule. Le résultat est exprimé en "heures" , "centième d'heure" Cordialement...
12/05/2012 à 08:58equation Extraction de coefficients d'une équation du second degréEssai ceci: Sub Extraction_coefficients_equation() Dim i As integer, Nb As integer Dim Equation As String Dim Nombre As Double Equation = InputBox("tapez une équation ") For i = 1 To Len(Equation) If IsNumeric(Mid(Equation, i, 1)) Then Nombre = Val(Mid(Equation, i, Len(Equation) - i + 1)) Nb = Nb +...
11/05/2012 à 18:21fortbelinTexte de couleur variableJ'ai testé.... j'ai compris Merci (avec un peu de retard)...
11/05/2012 à 18:19bbexcelCompter le nombre d'adresses mail différentes avec critèresJoins un fichier, tu aurai plus de chance d'avoir des réponses qui correspondent à ta demande. Cordialement...
09/05/2012 à 18:53fortbelinTexte de couleur variableSur le même principe que Banzai: Tu saisie le texte puis tu double clic dessus. Question pour Banzai: tu peux expliquer If Target.Count > 1 Cordialement...
09/05/2012 à 18:16kossoA1 egal somme des valeurs dont la case voisine est egal à XSur le même principe mais avec sommeprod...
06/05/2012 à 18:50Cam90Suppression de lignesJe suis loin d'être un expert en VBA. Voici ce que je te propose Sub Macro1() Dim i%, Nbligne% 'compte le nombre de ligne dans la colonne A Nbligne = Application.CountA(Range("A:A")) ' on effectue une boucle sur le nombre de ligne For i = Nbligne To 2 Step -1 ' on regarde la valeur des cellule en co...
05/05/2012 à 11:47fifamey Automatiser en valeur absolueOups effectivement argument VRAI= argument FAUX. Comme quoi, mieux vaut lire 2 fois plutot qu'une ces messages...
05/05/2012 à 08:04fifamey Automatiser en valeur absolueQue se passe t-il s'il n'y a pas de valeur négative ? Dans ce cas on retranche dans 2 valeurs positives avec la formule de OOoiste. Si le calcul consiste à donner l'intervalle entre 2 valeurs, je propose ceci : =SI(MIN(A2:A25)>0;MAX(A2:A25)-MIN(A2:A25);MAX(A2:A25)-MIN(A2:A25)) Cordialement...
02/05/2012 à 18:04melissabo23MoyenneS'il s'agit d'une moyenne arithmétique c-à-d une moyenne « ordinaire », c'est la somme des valeurs numériques divisée par le nombre de ces valeurs numériques. Dans ton cas ton total divisé par ...12, du moins si bien compris ta demande. =(Janvier!B11+Février!B11+Mars!B11+Avril!B11+Mai!B11+Juin!B11+J...
02/05/2012 à 17:59hanaaValeurs fixes à choisirTu crée une feuille base , dans la colonne A par exemple que tu renomme "choix", tu renseigne les valeurs que tu veux proposer dans ta liste. Dans la feuille saisie, tu sélectionnes la colonne A , dans l'onglet "Données", choisi "validation" , "Options" , dans "Autoriser" choisi liste puis dans "Sou...
01/05/2012 à 18:35DARI67ONGLET s'y référer dans le même classeurTrouver sur certains forum la formule suivante: =DROITE(CELLULE("filename";A2);NBCAR(CELLULE("filename";A2))-TROUVE("]";CELLULE("filename";A2);1)) Ne me demande pas de l'expliquée, je ne suis pas un expert d'Excel, certains sur ce forum pourront certainement la décortiquée. Cordialement...
25/04/2012 à 18:45chris0107 Frais dans Bon de commandeDans la cellule K40: =5+NBVAL(B2:B38)*0,25 Voir fichier joint Cordialement...
24/04/2012 à 18:12nanadami Remplacer des mots-clés dans une colonneJe ne suis que débutant en VBA mais voici un petit code: Il y a certainement plus simple mais je laisse le soin aux personnes plus expertes que moi de te répondre. Cordialement...
09/04/2012 à 21:33jeanflProblème prise en compte de la date dans un tableau ci-jointComme le disent régulièrement les membres habitués, joint un fichier pour avoir une réponse. Cordialement...
09/04/2012 à 19:34olivier63400 Ouvrir automatiquement un userformDans ton fichier, tu ouvres Visual Basic Editor (touche Alt+F11), tu ajoute dans "ThisWorkbook" , le code suivant (en ayant défini ton userform) Private Sub Workbook_Open() UserForm1.Show End Sub Cordialement Nad et ketamacanna bien plus rapide......
07/04/2012 à 16:56kidou89 Nuage de point avec nomsSUite à la réponse de CB60, ci-joint le fichier modifié. Contrairement à lui, je ne passe pas par une macro mais je crée une série qui correspond à chaque ville. Plus fastidieux, car une ville= une série. La solution macro semble la plus "efficace". Cordialement...
07/04/2012 à 16:39kidou89 Nuage de point avec nomsJ'ai un peu de mal à comprendre mais ci-joint le fichier avec un nouveau graphique. C'est ce que tu cherches ...
04/04/2012 à 18:21kidou89 Nuage de point avec nomsTu m'étonnes un peu mais tu peux essayer d'une autre manière. Sur ton graphique tu double-clic sur un point et une fenêtre "Format de série de données" devrai apparaitre, choisi "Etiquettes de données" puis sélectionne "Nom de série"...
02/04/2012 à 18:58kidou89 Nuage de point avec nomsTu clique droit sur ton graphique et tu choisis "Option du graphique" puis "Etiquettes de données" et enfin tu sélectionnes "Nom de série" Cordialement...
02/04/2012 à 17:43Basosa Coller juste valeurOn peut de cette manière: Sub Macro1() For i = 1 To 52 Sheets("feuil" & i).Select [H1].Copy [G1] Next End Sub Cela répond à ta question. Pourquoi ne pas avoir créer une feuille type et la copier ? Cordialement...
01/04/2012 à 17:13famhouse60Ne faire apparaître que les feuilles Excel remplies ?Je pense comprendre ton problème, j'ai regarder dans outils--> option je n'ai rien vu pour répondre à ta question. Mais pour rebondir sur ce qu'a dit BrunoM45, un fichier serai utile. Cordialement...
31/03/2012 à 19:07patrick33 Format nombreDans la msgbox suivante: MsgBox "Le flux " & choixflux & " va être traiter avec " & Nbligne & " lignes" & Chr(13) & Chr(10) & Chr(10) & "Temps approximatif de traitement " & (0.06 * Nbligne) & " secondes", vbInformation, "Traitement extraction" je souhaite que le calcul surligné en gras apparaisse a...
31/03/2012 à 18:20rocket4 Rechercher dans une plage de cellulesJe ne suis pas spécialiste en VBA, mais voici une petite macro pour répondre à ta demande. Sub recherche() Dim reponse As String reponse = InputBox("Valeur recherchée ?", "Recherche") If WorksheetFunction.CountIf(Range("a1:a10"), reponse) > 0 Or _ WorksheetFunction.CountIf(Range("b1:b10"), repons...
28/03/2012 à 21:13imbertphilippeSolution avec VBA??Je ne suis pas un expert du forum, je dirai même que je débute. Le premier réflexe, pour avoir une réponse, est dejoindre un fichier pour comprendre ton problème. Cordialement...
26/03/2012 à 20:35CAPUCIN Identifier toute les cellules identiques a la cellule activeOn voit de suite ceux qui ont une certaine maitrise de VBA. Désolé d'avoir été un peu plus rapide . J'espère avoir répondu à la demande de Capucin. Cordialement...
26/03/2012 à 18:51CAPUCIN Identifier toute les cellules identiques a la cellule activeEssaie cette petite macro. Je ne suis pas un membre expert du forum, il y a peut-être plus simple et plus efficace. Sub Selection() Dim c As Range For Each c In Range("I:I") If c.Value = ActiveCell.Value Then c.Interior.ColorIndex = 3 ' fond de cellules en rouge Next c End Sub Cordialement...