/ / Interior.PatternTintAndShade-Eigenschaft - excel, vba, xlsx

Interior.PatternTintAndShade-Eigenschaft - excel, vba, xlsx

Ich arbeite an Excel-Tabellen mit einer großen Menge vonZellmuster basierte Daten. Ich versuche, die Werte dieser Zellmuster zu lesen und diese Informationen in einem anderen Blatt zu speichern. Dies kann ich jedoch nicht, da hierfür in Excel keine Funktion zur Verfügung steht. Bitte helfen Sie.

Antworten:

0 für die Antwort № 1

Laut Ihrem Titel scheint es, dass Sie VBA wollen. Jetzt ist es nicht klar, ob Sie kopieren möchten Interior.Pattern, Interior.PatternTintAndShadeoder vielleicht etwas anderes.

Der Code, den Sie brauchen, ist etwas wie

Dim wssrc as Worksheet, wstrg as Worksheet
Dim rngsrc as Range, clsrc as Range, cltrg as Range
Set rngsrc = <what you want>
For Each clsrc in rngsrc
Set cltrg = wstrg.Range(clsrc.Address)
cltrg.Interior.PatternTintAndShade = clsrc.Interior.PatternTintAndShade
Next clsrc

(PS: Ich habe derzeit kein System mit Excel, daher muss dieser Code möglicherweise etwas angepasst werden).

Andere Option, die vielleicht für Sie funktioniert, ist: zuerst kopieren und dann verwenden Range.PasteSpecial Methodemit dem ersten Argument xlPasteFormats. Dies ist die VBA-Methode für Bearbeiten -> Inhalte einfügen (siehe Kommentar von Jeeped).