Créer un tableau

Bonjour

J'ai une feuille avec des données et je souhaiterais créer un tableau mais à l'aide d'une macro sachant que je n'aurais pas à chaque fois le nombre ligne identique dans ma feuille de données.

Merci de votre aide

Cdt

Bonjour,

Et du coup, quel est votre problème concrètement ?

Les tableaux structurés sont des Objet ListObject (Excel) | Microsoft Learn en VBA.

Concrètement,

j'ai une feuille de données que je mets à jour toute les semaines.

A partir de cette feuille de données, je crée un tableau croisé dynamique avec mes parmètres

Chaque semaine, je veux donc coller mes nouvelles données dans le tableau pour mettre à jour mon tableau croisé dynamique.

Comment puis je faire ?

Veuillez trouver ci-joint un mini exemple pour illustrer le principe de fonctionnement. Rien de très compliqué.
Ne faites pas attention à la fonction, c’est juste pour créer des données aléatoires.

Sub AjouterDonnees()
  With Sheet1.ListObjects("tblData").ListRows.Add
    .Range.Value2 = Array(Now, GetRandomString)
  End With

  Sheet1.PivotTables("PivotTable1").PivotCache.Refresh
End Sub

Private Function GetRandomString() As String
  Dim strList, i As Long
  strList = Split("a,b,d,g,gt,dz,ew,d", ",")
  For i = 1 To 5
    GetRandomString = GetRandomString & strList(WorksheetFunction.RandBetween(LBound(strList), UBound(strList)))
  Next i
End Function

Merci de votre retour.

Je vais tester

Cdt