Contenu récent par Rosie

Dans ma procedure dans la partie insertion d'une feuille vide je recupère un objet Worksheets dans ma variable DSheet contenant le nom de la feuille Set DSheet = Worksheets("Data") Du coup comme argument de la procedure je prends le nom de la feuille (type String) au lieu de prendre un...

J'ai pu resoudre le problème. Merci pour votre aide

C'est en fait l'appel de la procedure qui pose le problème

C'est la ligne CreerPivot(feuille)

Voici la capture

J'ai corriger cette erreur mais ca ne fonctionne toujours pas

Sub CreerPivot(ByVal Data As Worksheet) 'Declaration de variable Dim PSheet As Worksheet Dim DSheet As Worksheet Dim PCache As PivotCache Dim PTable As PivotTable Dim PRange As Range Dim LastRow As Long Dim LastCol As Long 'Insertion d'une feuille vide On Error Resume Next...

Bonjour, Je souhaite écrire une procédure qui permet de créer un pivot en prenant en entrée un argument qui est la feuille qui contient les données. Voici comment je déclare ma procédure Sub CreerPivot(ByVal Data As Worksheet) Pour appeler cette procédure je fais Dim feuille As Worksheet Set...

Ca fonctionne parfaitement. Merci

Bonjour, J'aimerais exécuter une macro qui affiche un formulaire que l'utilisateur doit remplir et je dois récupérer les données saisies pour faire des traitements sur un fichier. Le problème est que je ne sais pas comment le faire. Pouvez vous m'aider SVP?