Contenu récent par Dranreb

  1. Dranreb

    XL 2010 mise à jour des liaisons de données externes en VBA

    Bonjour. Je ne sais pas, n'ayant pas sous la main la configuration de classeurs liés permettant de reproduire le cas. Tout ce que je peux vous dire c'est que pour beaucoup de commandes possédant une réponse standard par défaut, l'affichage d'une boite de dialogue de confirmation peut être évité...
  2. Dranreb

    XL 2010 Modifier un renvoi de contenu de cellule depuis un fichier qui a changé de nom

    Bonjour. Un brouillon de macro pourrait vous être obtenu en demandant l'enregistrement d'une nouvelle macro, pendant lequel vous utiliserier la commande Modifier les liaisons du groupe Connexions du menu Données.
  3. Dranreb

    Résolu XL 2010 Textbox format number avec des zéros au début

    Bonsoir. Private Sub CommandButton1_Click() With Worksheets("Feuil1").[A1000000].End(xlUp).Offset(1) .Value = Me.TextBox1.Value .NumberFormat = String(15, "0") End With End Sub Private Sub CommandButton2_Click() Me.TextBox1.Text =...
  4. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Non, on y affecte la valeur de la région courante contenant la cellule A1 Aïe, ce n'est peut être pas bon si la colonne B est vide. Il vaudrait mieux : TDon = WshDonn.UsedRange.ValueOu bien : TDon = WshDonn.[A1:E1].Resize(WshDonn.[A1000000].End(xlUp).Row).Value Redim permet d'attribuer des...
  5. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Dim TDon() déclare un tableau dynamique d'éléments de type Variant. Pareil pour TRés. Non, LD pour moi signifiait le numéro de Ligne courant dans le tableau des Données. Et LR signifie le numéro de Ligne courant dans le tableau des Résultats
  6. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Cette version devrait permettre de remplacer les données par le résultat dans la même feuille, à condition que les URL identiques soient bien ensembles comme dans le premier résultat. Sub SortirAttributs() Const TInfIdAttr = "['id_attribute']='", TInfAttrib = "';tabInfos['attribute']='"...
  7. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Commentez le vous même quitte à me dire ce que vous ne comprenez pas. Parce que si en plus du code vous avez mes commentaires à comprendre ça fait double travail ;) Et ne m'en faites pas une longue liste: deux ou trois questions à la fois. D'ailleurs vous pourrez probablement, au bout d'un...
  8. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Attention, j'ai corrigé deux trois fois des détails du code.
  9. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Si ça marche, la procédure pourrait ressembler à ça : Option Explicit Sub SortirAttributs() Const TInfIdAttr = "['id_attribute']='", TInfAttrib = "';tabInfos['attribute']='" Dim WshRésu As Worksheet, WshDonn As Worksheet, TDon(), LD&, TRés(), LR&, _ TSp1() As String, TSp2() As...
  10. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    N'est-ce pas un peu malaisé de compléter la Feui1 pendant que vous l'explorez ? Car elle sert aussi de feuille de départ, n'est-ce pas ? Et si vous vous apercevez que vous avez oublié une URL qu'est-ce que vous faites ? Il vaudrait mieux produire le résultat dans une autre feuille Ce serait bien...
  11. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    J'ai encore du mal à voir la relation entre toutes ces feuilles …
  12. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    C'est la feuille résultat ? htmlCodePage n'est pas connu chez moi, je ne peux pas créer la feuille "code source"
  13. Dranreb

    Office 365 insertion d'un nombre variable de données dans une boucle

    Bonjour Les dernières instructions avant JUSQUE LÀ TOUT MARCHE me semblent néanmoins suspectes, dans la mesure où Split renvoie un tableau basé 0 et non pas 1. Donc vous ne bouclez qu'a partir de son second élément, d'indice 1. J'aurais mieux compris For h = 0 To UBound(tablo) Mais c'est peut...
  14. Dranreb

    Résolu XL 2019 Lier une cellule à la valeur d'une cellule d'une autre feuille et non à la cellule en elle-même

    Bonjour. Ce que je verrais ce serait un traitement à l'activation des feuilles. Il consisterait à remplacer dans l'autre feuille toutes les références à celle activée par leur valeurs avant de transformer au contraire sa valeur dans celle activée en une référence absolue vers l'autre. Mais s'il...
  15. Dranreb

    XL 2016 Modification fichier Excel pour chrono kart avec cellule IR

    J'ai finalement coupé la poire en deux: le réaffichage de l'UFmSélection ne dépend plus de la manière dont la ligne a été sélectionnée, mais elle n'est pas non plus systématique. Elle est activée lors de l'affichage par le bouton "Choix N° kart", elle est désactivée par sa croix de fermeture...
Haut Bas