Contenu récent par job75

  1. job75

    XL 2019 filtre avancé VBA

    Au lieu d'un code improbable expliquez en bon français comment vous voulez filtrer.
  2. job75

    XL 2016 Edition d'une note

    Bonjour, Pourquoi ouvrir une nouvelle discussion ? Posez la question sur le fil qui vous pose problème. A+
  3. job75

    XL 2019 filtre avancé VBA

    Bonjour, Vous croyez qu'on va s'amuser à tester le code sans fichier ? A+
  4. job75

    XL 2013 Transfert des données d’Excel vers Word

    Bonjour kikoudz Les 3 CheckBox du fichier Word ne fonctionnent pas chez moi, ce fichier Word ne va donc pas. Avec le fichier Excel que j'ai proposé pas besoin d'UserForm ni de VBA. A+
  5. job75

    XL 2016 Problème avec date heure

    Bonjour fenec, goube, JHA, GALOUGALOU, Avec une macro pas besoin de formules, celle-ci va bien : Private Sub Worksheet_Change(ByVal Target As Range) Dim colA As Range, colB As Range, colD As Range, decal&, i& Set colA = [Tableau2].Columns(1).Cells Set colB = [Tableau2].Columns(2).Cells Set colD...
  6. job75

    XL 2019 Trouver dernière cellule avec une valeur

    Bonjour M12, Jacky67, On peut aussi utiliser dans la feuille cette formule matricielle : =MAX((A5:A1000<>"")*LIGNE(A5:A1000)) à valider par Ctrl+Maj+Entrée, ou l'utiliser en VBA : dlig = [MAX((A5:A1000<>"")*ROW(A5:A1000))] Adapter 1000 bien sûr. A+
  7. job75

    XL 2019 Trouver dernière cellule avec une valeur

    Bonjour netparty, le forum, S'il n'y a pas de cellules vides ou textes vides "" entre les textes : dlig = Application.CountIf(Range("A5:A" & Rows.Count), "><") + 4 A+
  8. job75

    XL 2019 Le problème du raccourcis Ctrl+D ...

    La touche Suppr n'efface ni les couleurs ni les bordures.
  9. job75

    XL 2019 macro prendre en photo un tableau à l'instant T

    Bonjour akujah, Bruno, Attention, sur les versions Excel récentes cette instruction : ActiveChart.Paste ne s'exécute pas toujours, il faut la forcer par une boucle d'attente : While ActiveChart.Shapes.Count = 0 ActiveChart.Paste Wend A+
  10. job75

    XL 2019 Le problème du raccourcis Ctrl+D ...

    Bonjour à tous, Affectez le raccourci Ctrl+d à cette macro : Sub Clear() 'se lance par le raccouci Ctrl+d ActiveCell.Clear End Sub A+
  11. job75

    XL 2019 VBA - Copier/Coller de colonnes vers un Excel

    Une autre solution, plus compliquée mais plus rapide, consiste à traiter séquentiellement le fichier CSV : Sub MAJ() Dim h1#, h2#, h3#, h4#, h5#, h6#, x%, texte$, s, v, n1&, tablo1(), n2&, tablo2(), n3&, tablo3() h1 = [E3]: h2 = [E4]: h3 = [E6]: h4 = [E7]: h5 = [K3]: h6 = [K4] x = FreeFile Open...
  12. job75

    XL 2019 VBA - Copier/Coller de colonnes vers un Excel

    Bonjour GENTILE, Hasco, le forum, En VBA une solution très simple et rapide est d'utiliser le filtre avancé : Sub MAJ() Application.ScreenUpdating = False Workbooks.OpenText ThisWorkbook.Path & "\LP - Test.csv", Local:=True 'à adapter [J2] = "=(C2>=" & Replace(Feuil1.[E3], ",", ".") & ")*(C2<="...
  13. job75

    Autres Arrêt du forum pendant plus de 2 heures

    Je ne comprends pas, XLD n'est plus sur XenForo ? Depuis quand ?
  14. job75

    Autres Arrêt du forum pendant plus de 2 heures

    Merci pour l'info David, bon courage. A quoi sert Apache (c'est quoi ?) sur XLD ?
  15. job75

    Autres Arrêt du forum pendant plus de 2 heures

    Bonsoir, Le forum n'a pas été accessible pendant plus de 2 heures. Merci de nous dire pourquoi David. A+
Haut Bas