Résultats de la recherche

  1. D

    XL 2010 Afficher un doc Word sur une feuille et pouvoir le faire défiler

    Bonjour à tous, Tout est dans le titre. Je voudrais pouvoir afficher un doc sur ma feuille et qu'on puisse le faire défiler. Je sais qu'il est possible de faire défiler du texte dans une textbox mais ce n'est pas ce que je désire. En cherchant sur internet, il est question d'un contrôle OLE...
  2. D

    Microsoft 365 VBA QueryTables ne retourne pas toutes les tables d'une URL

    Bonjour, Je cherche à récupérer la table numérotée 8 avec Power Query. URL : https://www.boursorama.com/bourse/opcvm/cours/composition/MP-400876/ J'utilise le code suivant : Sub Query() Dim qtSM As QueryTable, Txt As String, Dat As Date With ActiveSheet ' .QueryTables(1).Delete...
  3. D

    Microsoft 365 EQUIVX renvoie des résultats différents

    Bonjour, Je ne comprends pas ce qui se passe. En B11, =EQUIVX("*";INDIRECT("a3:"&ADRESSE(3;COLONNE()));2;-1) Renvoie 2. La même formule, incorporée dans : =FILTRE(FILTRE('recap absences'!$B:$KT;('recap absences'!A:A='Annexe Calcul Heures'!$A5));('recap...
  4. D

    Microsoft 365 VBA une listbox devient inactive lors du second passage

    Bonjour, Je ne trouve aucune explication à ce problème. Pour le reproduire : - Ouvrir le classeur joint - clic sur "Update trading date" - clic sur "Update training info for another day" - clic sur "November" - clic sur "Wrong date !..." On recommence la boucle en choisissant une date supérieure...
  5. D

    Microsoft 365 Diviser un tableau en une formule (Excel 365)

    Bonjour, J'ai un tableau qui se présente ainsi : Marseille;312 Paris;986 Lyon;104 Je souhaite obtenir deux colonnes : Marseille 312 Paris 986 Lyon 104 On peut le faire avec FRACTIONNER.TEXTE sur chaque ligne. Ce que je cherche, c'est le faire, si possible, en une...
  6. D

    Microsoft 365 VBA Problème dans un évènement Before Save

    Bonjour, Je rencontre un problème curieux. J'ai un évènement Before Close déclenchant un évènement Before Save : Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Save ... Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Dim C As Range...
  7. D

    Microsoft 365 VBA la commande ne s'exécute pas

    Bonjour, la commande n'affiche aucune boîte de dialogue : Application.Dialogs(xlDialogSaveAs).Show Comment faire ? Daniel
  8. D

    XL 2016 Ajouter une zone de texte à un graphique croisé dynamique

    Bonjour, Est-il possible d'ajouter une zone de texte ou une forme liée dynamiquement à une cellule ? C'est possible pour un graphique, mais je n'y arrive pas pour un GCD. Je ne vois pas comment faire, sauf à superposer un autre graphique transparent avec seulement la zone de texte apparente. Si...
  9. D

    XL 2016 Nom défini incorrect dans un graphique

    Bonjour, J'ai en colonne A une plage de dates. J'ai défini le nom "Plage6M" avec la formule : =INDIRECT("$A$"&EQUIV(MOIS.DECALER(AUJOURDHUI();-6);Sheet1!$A:$A)&":$A"&EQUIV(MAX(Sheet1!$A:$A);Sheet1!$A:$A;0)) le nom fonctionne dans une formule,, mais il est refoulé dans un graphique ...
  10. D

    XL 2016 VBA - Fichier texte particulier

    Bonjour, Je cherche à lire un fichier texte dont les enregistrements sont séparés par des caractères ASCII 10. Avec la méthode Line Input, le fichier est lu en une fois. Je dois ensuite faire un Split sur ce caractère. Est-il possible de le lire enregistrement par enregistrement ? Merci par...
  11. D

    XL 2016 Graphique - Bordure fantôme ?

    Bonjour, Je sèche sur ce problème. Je ne comprends pas pourquoi on voit les contours des séries alors qu'apparemment, j'ai codé "aucun trait". Pouvez-vous m'aider à les rendre invisibles ? Merci d'avance. Daniel
  12. D

    XL 2016 VBA - Classeur dans une autre instance - bizarrerie

    Bonjour, Je souhaite utiliser le code suivant pour lire un classeur sans l'afficher : Sub test1() Dim Wbk As Workbook, App As Object, L As Variant, C As Variant, V As Variant, Tabl1 As Date Dim Taabl2 As String Set App = CreateObject("Excel.Application") Set Wbk =...
  13. D

    XL 2016 Focus d'un textbox

    Bonjour, Le but est de remplir le tableau de la colonnes E. Il faut afficher le userform, puis cliquer dans la liste du listbox (ListBox1) ou entrer le début d'un nom tels qu'ils sont orthographiés en colonne A. Quand la listbox n'affiche plus qu'un nom, on appuie sur Entrée pour valider le...
  14. D

    XL 2016 Validation de données ignorée si valeur par macro

    Bonjour, Il semble que VBA ne tienne pas compte de la présence d'une validation dans une cellule. Par exemple : ActiveCell.Value = -2 fonctionne sans erreur même si la même valeur est rejetée quand elle est entrée manuellement. Pouvez-vous confirmer ce comportement ? Merci d'avance. Daniel
  15. D

    XL 2016 Utilisation d'une plage dynamique dans une MFC

    Bonjour, Je rentre le nom défini d'une plage dynamique dans une MFC. Le nom se transforme en référence de cellules et n'est donc plus dynamique : Nom : _AD Fais référence à : =DECALER(ESSAI2!$AD$6;;;NBVAL(ESSAI2!$AD:$AD)) Le nom sert à la définition de la plage à laquelle s'applique la MFC...
  16. D

    XL 2016 Graphique - Plus de valeurs X et Y au survol

    Bonjour, Bonjour, Au survol d'un point d'une série d'un graphique, les valeurs X et Y du point ne s'affichent plus. Est-ce que j'aurais changé une option involontairement ? Merci d'avance. Daniel
  17. D

    XL 2016 VBA - Problème de calcul, dépassement de capacité

    Bonjour, C'est sans doute simple, mais je ne vois pas... Le code suivant fonctionne : R = Int(100000 / 65536) Mais pas : R = Int(100000 / (255 * 255)) Erreur 6 dépassement de capacité. R est défini sans indication de type. merci par avance. Daniel
  18. D

    XL 2016 VBA - Problème avec le coper-coller

    Bonjour, J'ai ce code qui fonctionne en début de journée pour copier le contenu d'une cellule dans le presse-papiers : Dim obj As New DataObject Dim txt As String obj.SetText Target.Value obj.PutInClipboard Il n'y a pas d'erreur mais au lieu de la valeur de la cellule, le coller...
  19. D

    XL 2016 VBA - Anomalie avec le presse-papiers

    Bonjour, J'ai ce code qui fonctionne en début de journée pour copier le contenu d'une cellule dans le presse-papiers : Dim obj As New DataObject Dim txt As String obj.SetText Target.Value obj.PutInClipboard Il n'y a pas d'erreur mais au lieu de la valeur de la cellule, le coller...
  20. D

    XL 2016 VBA Problème avec les bordures intérieures

    Bonjour, J'ai un problème avec mon code. Les bordures intérieures verticales et horizontales ne se positionnent pas. J'ai essayé : .Borders(xlInsideVertical).LineStyle = xlContinuous ou With .Borders(xlInsideVertical) .LineStyle = xlContinuous .ColorIndex =...