Contenu récent par Dranreb

  1. Dranreb

    XL 2013 Combobox

    Bonsoir. Essayez comme ça : Dim OOt As OLEObject For Each OOt In Sheets("Feuil1").OLEObjects If OOt.Name Like "ComboBox*" Then OOt.Object.Value = "" Next OOt Ou bien, un peu plus proche de votre code initial : Dim OOs As OLEObjects, I As Integer Set OOs = Sheets("Feuil1").OLEObjects For I...
  2. Dranreb

    Outlook créer un raccourci formulaire

    Ah, non, je ne connais pas ça, désolé.
  3. Dranreb

    Outlook créer un raccourci formulaire

    Ce que vous appelez un formulaire, ce n'est pas un UserForm ?
  4. Dranreb

    Outlook créer un raccourci formulaire

    Bonjour. Si l'UserForm est affiché dans une Sub Workbook_Open dans le ThisWorkbook de votre classeur de macro, ne suffirait-il pas d'un raccourci, ou d'un lien hypertexte vers ce classeur ? Si c'est une autre Public Sub qui l'affiche, elle peut certainement s'affecter comme commande...
  5. Dranreb

    Autres [RÉSOLU] Mettre en format personnalisé h:mm

    Bonjour. Le format de nombre [h]"h"mm"mm" l'affiche comme vous dites, cette durée en jours vu que le jour est l'unité de temps commune de toutes les données relevant des formats d'heures et de dates. Notez que des texte entrés de la forme obtenue par ce format ne seraient pas reconnus comme des...
  6. Dranreb

    XL 2019 Problème de décimales

    Bonjour. Option Explicit Sub TexteNum() Dim Cel As Range, S As String For Each Cel In Selection If VarType(Cel.Value) = vbString Then S = Replace(Replace(Cel.Value, ",", ""), ".", ",") If IsNumeric(S) Then Cel.Value = CDbl(S) End If Next Cel End Sub
  7. Dranreb

    Microsoft 365 Formule avec conditions

    Bonjour. En B9 :=SOMMEPROD((MOIS($N$5:$N$6)=5)*(ESTNUM($I$5:$I$6))*(ESTNUM($J$5:$J$6))*OU($R$5:$R$6<>"";$T$5:$T$6<>"";$V$5:$V$6<>"")*($I$5:$I$6)*($J$5:$J$6))renvoie 2. Des série de )*( équivalent à des ET au lieu de OU.
  8. Dranreb

    XL 2019 Demande aide de formule

    Bonjour. Sans avoir ouvert le fichier, en I49: =MAX($I$44;0)
  9. Dranreb

    XL 2013 Excel récupérer la date du mercredi

    Bonjour. Des formules purement Excel et aussi des fonctions perso dans ce classeur.
  10. Dranreb

    Microsoft 365 Formules ne se calculent pas (résolu)

    Bonsoir. En 'Dimanche'!P3, à propager sur 11 lignes :=DROITE(N3;3)*1 Faites pareils pour les autres jours afin que partout ces textes soient convertis en nombre dont la moyenne puisse être établie.
  11. Dranreb

    Microsoft 365 VBA Fonction de calcul

    Nous on se demande même pourquoi elle est invoquée tout court sans qu'il y ait eu de Application.Calculation = xlCalculationManual pour accélerer l'exécution …
  12. Dranreb

    Microsoft 365 VBA Fonction de calcul

    Bonjour. https://learn.microsoft.com/fr-fr/office/vba/api/excel.worksheet.calculate(method) Remarque: la programmation générale montrée me procure une légère impression de bricolage au sérieux douteux …
  13. Dranreb

    XL 2010 Création déroulé Olympiades

    Bonjour. Avec une seconde présentation possible proposée (ça me semble mieux pour un trop grand nombre joueurs, donc de manches).
  14. Dranreb

    Autres Tirage au sort pour concours de pétanque.

    S'il n'y a que des triplettes, le nombre de manches jouées en équipes de 3 doit évidemment être égal au nombre total de manches. Par contre s'il y a assez peu de triplettes pour qu'une seule manche en groupe de 3 suffise pour tous, mais que vous y laissez le nombre de manches, à tous les coup...
Retour