Merci de me préciser la version Visual Basic correspondant à ce code, et
surtout un lien vers une documentation de cette version : fonctions, objets,
méthodes, propriétés autorisées.
Sub test()
ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
"Détail!R2C1:R" & counter - 1 & "C29", TableDestination:="",
TableName:= _
"Tableau croisé dynamique1"
ActiveSheet.PivotTables("Tableau croisé dynamique1").AddFields
RowFields:= _
"Code Programme"
ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _
"Désignation précise du bien").Orientation = xlDataField
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Patrick Philippot
diff wrote:
Merci de me préciser la version Visual Basic correspondant à ce code, et surtout un lien vers une documentation de cette version : fonctions, objets, méthodes, propriétés autorisées.
Sub test() ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _ "Détail!R2C1:R" & counter - 1 & "C29", TableDestination:="", TableName:= _ "Tableau croisé dynamique1" ActiveSheet.PivotTables("Tableau croisé dynamique1").AddFields RowFields:= _ "Code Programme" ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _ "Désignation précise du bien").Orientation = xlDataField End Sub
Bonjour,
Ce code provient très probablement d'une macro VBA dans Excel. Voir documentation VBA et / ou Excel.
Il peut aussi venir d'un programme VB6 utilisant Excel via Automation.
Le modèle objet d'Excel est documenté ici: http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/dv_wrcore/html/wroriautomatingexcelusingexcelobjectmodel.asp
-- Patrick Philippot - Microsoft MVP MainSoft Consulting Services www.mainsoft.fr
diff wrote:
Merci de me préciser la version Visual Basic correspondant à ce code,
et surtout un lien vers une documentation de cette version :
fonctions, objets, méthodes, propriétés autorisées.
Sub test()
ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
"Détail!R2C1:R" & counter - 1 & "C29", TableDestination:="",
TableName:= _
"Tableau croisé dynamique1"
ActiveSheet.PivotTables("Tableau croisé dynamique1").AddFields
RowFields:= _
"Code Programme"
ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _
"Désignation précise du bien").Orientation = xlDataField
End Sub
Bonjour,
Ce code provient très probablement d'une macro VBA dans Excel. Voir
documentation VBA et / ou Excel.
Il peut aussi venir d'un programme VB6 utilisant Excel via Automation.
Le modèle objet d'Excel est documenté ici:
http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/dv_wrcore/html/wroriautomatingexcelusingexcelobjectmodel.asp
--
Patrick Philippot - Microsoft MVP
MainSoft Consulting Services
www.mainsoft.fr
Merci de me préciser la version Visual Basic correspondant à ce code, et surtout un lien vers une documentation de cette version : fonctions, objets, méthodes, propriétés autorisées.
Sub test() ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _ "Détail!R2C1:R" & counter - 1 & "C29", TableDestination:="", TableName:= _ "Tableau croisé dynamique1" ActiveSheet.PivotTables("Tableau croisé dynamique1").AddFields RowFields:= _ "Code Programme" ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _ "Désignation précise du bien").Orientation = xlDataField End Sub
Bonjour,
Ce code provient très probablement d'une macro VBA dans Excel. Voir documentation VBA et / ou Excel.
Il peut aussi venir d'un programme VB6 utilisant Excel via Automation.
Le modèle objet d'Excel est documenté ici: http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/dv_wrcore/html/wroriautomatingexcelusingexcelobjectmodel.asp
-- Patrick Philippot - Microsoft MVP MainSoft Consulting Services www.mainsoft.fr
