/ / Proprietà Interior.PatternTintAndShade - excel, vba, xlsx

Proprietà Interior.PatternTintAndShade - excel, vba, xlsx

Sto lavorando su fogli Excel con grandi quantità didati basati sul modello di cella. Sto cercando di leggere i valori di questi modelli di celle e di memorizzare tali informazioni in un altro foglio. Ma non sono in grado di farlo in quanto non esiste alcuna funzione disponibile per farlo in Excel. Per favore aiuto.

risposte:

0 per risposta № 1

Come per il tuo titolo, sembra che tu voglia VBA. Ora, non è chiaro se si desidera copiare Interior.Pattern, Interior.PatternTintAndShadeo forse qualcos'altro.

Il codice che ti serve è qualcosa di simile

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: al momento non ho un sistema con Excel, quindi questo codice potrebbe richiedere piccole modifiche).

Un'altra opzione che forse funziona per te è: prima copia e poi uso Range.PasteSpecial Metodo, con il primo argomento xlPasteFormats. Questo è il metodo VBA per modificare -> Incolla speciale (vedi commento di Jeeped).