Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
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...
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...
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?
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.