door HPvL | 11-11-2021 | VBA Tutorials
t Class from Table Option Explicit ‘propertiesPublic Pr_Line As IntegerPublic Pr_Key As StringPublic Pr_Group As StringPublic Pr_ERPId As StringPublic Pr_LocalName As StringPublic Pr_OneStreamId As StringPublic Pr_Type As StringPublic Pr_DV As Boolean...
door HPvL | 16-09-2021 | VBA Tutorials
t Create a Pivot Table 1 public wbTest as workbookpublic wsTable as worksheetpublic wsPiv as worksheet Sub CreatePivotTable wbTest.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=wsTable.ListObjects(“tblTest”), Version:=6).CreatePivotTable...
door HPvL | 09-05-2021 | VBA Tutorials
t Split a string Dim SplitArray() as string ‘(Dim verplicht as string) SplitArray() = Split(TeSplitsenString, “/”)For ArrCntr = LBound(SplitArray()) To UBound(SplitArray()) If Trim(SplitArray(ArrCntr)) = TestString Then …. End...
door HPvL | 05-05-2021 | VBA Tutorials
t Add aTable Application.CutCopyMode = FalsewsReport.ListObjects.Add(xlSrcRange, Range(“$A$6:$I$7”), , xlYes).Name = “FtrTable”wsReport.ListObjects(“FtrTable”).TableStyle = “TableStyleMedium10″...
