Meredita jautā:
Es rakstu makro, kas piešķir izvēlēto aktīvo šūnu pārbaudi. Mans kods ir šāds:
ActiveCell.FormulaR1C1 = "x"Es gribu zināt, kā makro mainīt fontu no Arial uz Wingdings. Vai jūs varat man palīdzēt izdomāt kodu, lai formatētu manu aktīvo šūnu ar noteiktu fontu un piešķirtu manu simbolu "*" ???
Paldies par tavu palīdzību.
Diapazoniem ir objekts Fonts, kas cita starpā apstrādā visas lietas, ko jūs varat darīt, tas ir, padarīt to treknu, mainīt tā lielumu un mainīt fontu. Viss, kas jums jādara, ir:
ActiveCell.Font.Name = "Wingdings"
