Office: (Office 2016) ListObject - Varinate A funktioniert, aber Variante B nicht?

Hallo,

mal eine Frage.
Ich möchte ein einfaches ListObject erstellen.

Variante A funktioniert ohne Probleme.

.ListObjects.Add(xlSrcRange, rngListRange, False, xlYes).Name = strListName

Variante B funktioniert leider nicht:

.ListObjects.Add(SourceType:=xlSrcRange, _
Source:=rngListRange, _
LinkSource:=False, _
HasHeaders:=xlYes).Name = strListName

Was ist da nicht i.O.
(ist bestimmt total simpel J )

SG
Tauchmann

 

Hallo

Code:

.ListObjects.Add(SourceType:=xlSrcRange, _
 Source:=rngListRange, _
 LinkSource:=False, _
 [COLOR="#FF0000"]XlListObject[/COLOR]HasHeaders:=xlYes).Name = strListName

Die Microsofthilfe zu diesem Thema
https://msdn.microsoft.com/de-de/library/office/ff823155(v=office.15).aspx
ist stark fehlerbehaftet!

 

Hallo Exl121150,

und so funktionieret es.
Wenn man es nicht bei MS richtig hat, wo bekommt man dann dir richtige Info her?
Darf ich fragen woher man die richtige Schreibweise bekommt?

SG
Tauchmann

 

Hallo,

indem man auf die kontextsensitive Hilfe beim VBA-Programmieren achtet.

Dazu gibt man zB. folgende Anweisungsabfolge ein:
'....
'....
Dim Ws As Worksheet
Ws.ListObjects.Add(


1) Sobald man den ersten Punkt nach "Ws" eintippt, bekommt man automatisch eine Listbox eingeblendet, die alle fürs Worksheet-Objekt möglichen Eigenschaften, Methoden und Ereignisse enthält.
In dieser Liste kann man zB. "ListObjects" anwählen (indem man ein "L" eintippt) und anschließend die TAB-Taste drücken und schon steht im Source-Text "Ws.ListObjects" dort.

2) Dann tippt man den nächsten Punkt und erhält automatisch eine Listbox eingeblendet, die alle fürs ListObjects-Objekt möglichen Eigenschaften und Methoden enthält.
In dieser Liste kann man zB. "Add" anwählen (indem man ein "A" eintippt) und anschließend die TAB-Taste drücken und schon hat man im Source-Code "Ws.ListObjects.Add" stehen.

3) Dann tippt man die "(" ein und erhält in diesem Fall gleich 2 verschiedene Hinweisfenster eingeblendet:
a) ein hellgelbes Quicktipp-Fenster, das die Funktionssignatur der "Add"-Funktion enthält:
"Add([SourceType As XLListObjectSourceType = xlSrcRange], [Source], [LinkSource], [XlListObjectHasHeaders As XlYesNoGuess = xlGuess], [Destinantion], [TableStylename]) As ListObject"
Dabei bedeuten die eckigen Klammern, dass es sich jeweils um einen optionalen Parameter handelt.
b) eine Listbox, die die vordefinierte Konstantenliste für den 1. Parameter "SourceType" enthält.
Dazu tippt man nach der "(" den ersten Parameternamen "SourceType:=" ein, nach dem eingetippten ":=" erscheint sofort die vorhin erwähnte Konstenantenliste, aus der man "xlSrcRange" anwählt und die TAB-Taste drückt, sodass im Source-Text steht:
"Ws.ListObjects.Add(SourceType:=xlSrcRange"

4) Dann tippt man das Komma "," ein, sodass wieder das hellgelbe Quicktipp-Fenster erscheint und den nächsten Parameter "[Source]" fett anzeigt.

5) Diesen tippt man ein "Source:=" ... usw.