17656 résultats trouvés

par Amadéus
6 octobre 2019, 19:15
Forum : Excel - VBA
Sujet : Réduction d'une formule
Réponses : 13
Vues : 80

Re: Réduction d'une formule

Bonjour Salut tulipe tulipe doit être fatigué; je détaille Tu cherches à sommer l'ensemble de tes feuilles Mois en fonction du texte de la cellule C3 La première colonne de ta plage de recherche est la Colonne G G3:G61 Tu veux le résultat de la 41ème colonne de plage G3:BG61 soit de la colonne AU. L...
par Amadéus
16 septembre 2019, 16:20
Forum : Excel - VBA
Sujet : Problème de conversion heures+minutes en jours+heures
Réponses : 9
Vues : 138

Re: Problème de conversion heures+minutes en jours+heures

Bonjour
Pour E18, formule en E19
=TEXTE(E18;"J""j""hh""h""m""m""")
Cordialement
par Amadéus
14 septembre 2019, 18:38
Forum : Excel - VBA
Sujet : Sommeprod donne des résultats erronés
Réponses : 2
Vues : 53

Re: Sommeprod donne des résultats erronés

Bonjour
Dans ton exemple F2 est égal à 1
Le résultat 11,43 est donc correct.
C'est éventuellement en colonne F qu'il te faut modifier parce que F10 a la valeur 3
cordialement
par Amadéus
14 septembre 2019, 18:32
Forum : Excel - VBA
Sujet : Activer liens hypertextes mailto sur plusieurs cellules
Réponses : 4
Vues : 94

Re: Activer liens hypertextes mailto sur plusieurs cellules

Bonjour Ci joint un fichier exemple avec un code qui fonctionne. Cette solution était donnée en 2007 par Alain0654 Le code pour activer les adresses mail de A1 à A30 Pour éviter le plantage avec les lignes vides, j'ai ajouté l'instruction. Sub Activer_Adresses_Mail() Dim Cell As Range Range("A1:a30"...
par Amadéus
4 septembre 2019, 16:31
Forum : Excel - VBA
Sujet : Activer liens hypertextes mailto sur plusieurs cellules
Réponses : 4
Vues : 94

Re: Activer liens hypertextes mailto sur plusieurs cellules

Bonjour Pour activer tous les liens de la plage H9:H100 Tu crées un bouton auquel tu affectes cette Macro (Macro dans un Module) Sub Activer_Liens() Dim c As Range For Each c In Range("H9:H100") c.Hyperlinks.Add c, c.Value Next c End Sub Pour supprmer tous les liens de la feuille Sub ZapHyperlinks()...
par Amadéus
21 août 2019, 15:42
Forum : Excel - VBA
Sujet : Aide sur un macro
Réponses : 1
Vues : 34

Re: Aide sur un macro

Bonjour
Rajoute -1 sur la dernière ligne du Module-gmb
Range("A10:A" & Range("A" & Rows.Count).End(xlUp).Row - 1).DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _
Step:=1, Trend:=False
Cordialement
par Amadéus
12 juillet 2019, 18:43
Forum : Excel - VBA
Sujet : Recherche
Réponses : 3
Vues : 47

Re: Recherche

Bonjour
Je pense que le fichier que tu as joint est inexploitable.
Peux tu envoyer un fichier cohérent?
Cordialement
par Amadéus
10 mai 2019, 16:53
Forum : Excel - VBA
Sujet : FORMULe SI
Réponses : 10
Vues : 174

Re: FORMULe SI

Bonjour
Avec en J15 un format Texte qui affiche 1/12 ou 1/13; etc
En K15, la formule
=INDEX({500;500;250;200;150;100};EQUIV(SUBSTITUE(J15;"1/";"")*1;{15;16;17;18;19;20};1))
Cordialement
par Amadéus
30 avril 2019, 17:40
Forum : Excel - VBA
Sujet : Fermer fichier excel en cliquant sur image sans enregistrer
Réponses : 2
Vues : 110

Re: Fermer fichier excel en cliquant sur image sans enregistrer

Bonjour
Code dans un Module
Sub Fermer()
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
End Sub
Clic droit sur image
Affecter une Macro..
Cordialement