Résultats de la recherche

  1. B

    Microsoft 365 Chercher et compter dans un intervalle de date pour remplir un tableau

    Merci ça fonctionne parfaitement Que signifie les -- devant D$10?
  2. B

    Microsoft 365 Chercher et compter dans un intervalle de date pour remplir un tableau

    Bonjour à tous, J'ai un tableau très simple de réservation d'hôtels par nom du voyageur avec une date d'arrivée, de départ et le nombre de nuit. Il existe plusieurs références d'hôtels dans ce tableau. Je souhaite donc mettre à jour automatiquement un second tableau où l'on voit le nombre de...
  3. B

    Microsoft 365 VBA Compter 2 lignes après la fin d'un tableau dont on a le nom

    Merci Yal, c'est encore plus simple :)
  4. B

    Microsoft 365 VBA Compter 2 lignes après la fin d'un tableau dont on a le nom

    Bonsoir à tous, Avec du VBA j'insère dans une feuille des tableaux via des connexions Power query. Chaque tableau correspond à un 1 jour et s'appelle Jour" & i & "_client. Le nombre de jours est variable et la taille des tableaux est elle aussi variable. Je peux donc avoir dans un document 2...
  5. B

    Microsoft 365 Copier les données d'un tableau vers un autre

    Bonjour cp4, Désolé pour ma réponse tardive. Merci pour ton nouveau code. J'ai une erreur (Object variable or with block variable not set) avec cette ligne : .ListColumns(lc).DataBodyRange = x Est-ce que tout fonctionnait chez toi? Merci et bon dimanche
  6. B

    Microsoft 365 Copier les données d'un tableau vers un autre

    Merci cp4, Le code fonctionne très bien mais j'ai l'impression qu'il oublie d'ajouter le bon nombre de ligne au tableau avant de coller les données. Ce qui fait qu'un tableau peut empiéter sur un autre. A quoi sert cette partie, je ne comprends pas très bien ? Set lig = tB.ListRows.Add...
  7. B

    Microsoft 365 Copier les données d'un tableau vers un autre

    Merci, cp4, d'avoir pris le temps de travailler sur ma question. Si je veux d'abord supprimer le contenu du tableau de destination comment puis-je faire sans avoir d'erreur? Du coup est-ce qu'il est possible de copier toutes les valeurs du DataBodyRange sans les formules ? Le souci est que les...
  8. B

    Microsoft 365 Copier les données d'un tableau vers un autre

    En fait dans mon vrai fichier j'ai 8 tableaux, je veux transférer les données du 7 dans le 8, du 6 dans le 7, du 5 dans le 6 etc, c'est pour cela que j'ai une variable liée au nombre dans le nom du tableau. Pour mon fichier d'exemple les 3 tableaux sur le côté sont justes la pour éviter de...
  9. B

    Microsoft 365 Copier les données d'un tableau vers un autre

    Bonsoir cp4, Merci pour votre aide, voici mon tableau. Plutôt que de conserver les données du tableau de destination je cherche maintenant à les supprimer avant d'insérer le contenu du tableau source J'ai plusieurs soucis : 1 ) Si le tableau de destination est vide il y a une erreur pour...
  10. B

    Microsoft 365 Copier les données d'un tableau vers un autre

    Bonsoir à tous, Je cherche à copier les données de mon tableau 1 vers mon tableau 2 en insérant toutes les données à la fin du tableau 2. Je supprime ensuite toutes les données de mon tableau 1. J'ai créé ce code, tout à l'air de fonctionner à part que les données viennent en première ligne de...
  11. B

    Microsoft 365 Charger nombre variable de tableaux Query avec VBA

    Bonjour Wayki, La dernière écriture ne fonctionne pas non plus. Du coup j'ai essayé : Cela fonctionne bien mais rallonge l'écriture. Merci encore et bonne journée
  12. B

    Microsoft 365 Charger nombre variable de tableaux Query avec VBA

    Merci encore une fois Wayki, Malheureusement ma formule ne fonctionne pas avec le i , je pense avoir tout essayé. Du coup, J'ai essayé de remplacer le nom du tableau par un String faisant référence à une cellule qui à le nom du plus grand tableau mais rien ne fonctionne 😢
  13. B

    Microsoft 365 Mise en forme conditionnelle d'une ligne d'un tableau VBA

    Merci beaucoup Sylvanu, cela fonctionne très bien :)
  14. B

    Microsoft 365 Charger nombre variable de tableaux Query avec VBA

    Mille mercis Wayki ça marche très bien :) Je n'ai pas trop compris la logique de quand mettre les " avant ou après le texte par contre. Dans le reste de mon vrai fichier j'ai des formules comme : ws.Range("J55").Formula =...
  15. B

    Microsoft 365 Charger nombre variable de tableaux Query avec VBA

    Bonsoir à tous, Dans mon classeur, j'ai plusieurs tableaux Query qui sont en connexion et que je veux insérer dans mon deuxième onglet. J'ai créé une macro via l'enregistreur pour transformer toutes ces connexions en tableau. Cela fonctionne très bien (voir bouton vert) J'arrive aussi à toutes...
  16. B

    Microsoft 365 SOMMEPROD et SOMME.SI avec des tableaux - Eviter erreur #REF! via VBA ?

    Bonjour Dranreb, Oui tous mes tableaux sont bien les uns en dessous des autres, je suis obligé, car il y a des titres avec des dates automatiques entre les tableaux. Merci effectivement je ne savais pas que cette écriture donnait la même chose, car la zone rectangulaire colorée ne montrait que...
  17. B

    Microsoft 365 SOMMEPROD et SOMME.SI avec des tableaux - Eviter erreur #REF! via VBA ?

    Bonsoir à tous, j'ai 8 tableaux (Jour1_client à Jour8_client) dans une feuille de calcul avec en dessous de ces tableaux plusieurs calculs de totaux (ex: "Prix Total HT) basés sur des critères (ex: trouver "Lettonie" dans la colonne Pays) Voici un exemple de formule pour mon total qui...
  18. B

    Microsoft 365 Mise en forme conditionnelle d'une ligne d'un tableau VBA

    Bonjour à tous, Dans un tableau, si la valeur d'une cellule en dernière colonne est le mot Option, je cherche à mettre en gras toute la ligne du tableau J'ai besoin de le faire en VBA car mes tableaux sont insérés via des Query et souvent supprimés, c'est alors très long de recréer la mise en...
  19. B

    Power Point Aligner un objet (VBA)

    Bonjour à tous, Dans PowerPoint, je cherche à aligner en bas tous les objets répondant à un certain nom dans toute la présentation. Le code ci-dessous fonctionne très bien si j'enlève la référence (L) après le Then mais dans ce cas tous les objets sont alignés en bas. Or je voudrais que...
  20. B

    XL 2019 Remplacer la valeur d'une cellule par une formule si la cellule est égale à une autre

    Bonjour à tous, Comme le titre l'indique je souhaite remplacer la valeur de toutes les cellules dans une colonne par exemple E15:E200 qui ont une valeur identique à E11 par la formule =$E$11 L'enregistreur de macro me donne ce code : Sub Macro() Range("E15:E200").Select...