Ta vadnica vas bo naučila, kako uporabljati VBA z vrednostmi celic.
Nastavite vrednost celice
Če želite nastaviti vrednost celice, uporabite lastnost vrednost predmeta Obseg ali celice.
Razpon.Vrednost in celice.Vrednost
Obstajata dva načina za sklicevanje na celice v VBA:
- Objekt obsega - Razpon ("A2"). Vrednost
- Objekt celic - Celice (2,1) .Vrednost
Objekt Range vam omogoča sklicevanje na celico s standardnim zapisom »A1«.
S tem bo vrednost območja A2 = 1:
| 1 | Razpon ("A2"). Vrednost = 1 |
Objekt Cells vam omogoča sklicevanje na celico glede na številko vrstice in številko stolpca.
To bo nastavilo vrednost območja A2 = 1:
| 1 | Celice (2,1). Vrednost = 1 |
Upoštevajte, da najprej vnesete številko vrstice:
| 1 | Celice (številka vrstice, številka_številke) |
Nastavite vrednosti več celic hkrati
Namesto sklicevanja na eno celico se lahko sklicujete na obseg celic in hkrati spremenite vse vrednosti celic:
| 1 | Razpon ("A2: A5"). Vrednost = 1 |
Nastavi vrednost celice - besedilo
V zgornjih primerih nastavimo vrednost celice enako številki (1). Namesto tega lahko nastavite vrednost celice enako nizu besedila. V VBA mora biti vse besedilo obdano z navedki:
| 1 | Razpon ("A2"). Vrednost = "Besedilo" |
Če besedila ne obkrožite z navedki, bo VBA mislil, da se sklicujete na spremenljivko …
Nastavi vrednost celice - spremenljivo
Vrednost celice lahko nastavite tudi na spremenljivko
| 1234 | Zatemni strText kot nizstrText = "Niz besedila"Obseg ("A2"). Vrednost = strText |
Pridobite vrednost celice
Vrednosti celic lahko dobite z isto lastnostjo Value, ki smo jo uporabili zgoraj.
Pridobite vrednost ActiveCell
Če želite dobiti vrednost ActiveCell in jo prikazati v polju s sporočilom:
| 1 | MsgBox ActiveCell.Value |
Dodeli vrednost celice spremenljivki
Če želite dobiti vrednost celice in jo dodeliti spremenljivki:
| 123 | Dim var kot Variantvar = Razpon ("A1"). Vrednost |
Tu smo uporabili spremenljivko tipa Variant. Spremenljivke različic lahko sprejmejo vse vrste vrednosti. Namesto tega lahko uporabite vrsto spremenljivke String:
| 123 | Dim var kot Stringvar = obseg ("A1"). Vrednost |
Spremenljivka String bo sprejela številske vrednosti, vendar bo shranila številke kot besedilo.
Če veste, da bo vrednost vaše celice numerična, lahko uporabite vrsto dvojne spremenljivke (dvojne spremenljivke lahko shranijo decimalne vrednosti):
| 123 | Zatemni var kot dvojnovar = Razpon ("A1"). Vrednost |
Če pa poskušate vrednost celice, ki vsebuje besedilo, shraniti v dvojno spremenljivko, boste prejeli napako pri neskladju vrste:
Drugi primeri vrednosti celic
Kopiraj vrednost celice
Vrednost celice je enostavno nastaviti enako vrednosti druge celice (ali "Kopiraj" vrednost celice):
| 1 | Razpon ("A1"). Vrednost = Razpon ("B1"). Vrednost |
To lahko storite celo z obsegi celic (obsegi morajo biti enake velikosti):
| 1 | Razpon ("A1: A5"). Vrednost = Razpon ("B1: B5"). Vrednost |
Primerjajte vrednosti celic
Vrednosti celic lahko primerjate s standardnimi operaterji za primerjavo.
Preverite, če so vrednosti celic enake:
| 1 | MsgBox Range ("A1"). Value = Range ("B1"). Value |
Vrne TRUE, če so vrednosti celic enake. V nasprotnem primeru FALSE.
Za primerjavo vrednosti celic lahko ustvarite tudi stavek If:
| 12345678910111213 | Če Razpon ("A1"). Vrednost> Razpon ("B1"). Vrednost PotemRazpon ("C1"). Vrednost = "Več kot"Elseif Range ("A1"). Value = Range ("B1"). Value thenRazpon ("C1"). Vrednost = "Enako"Sicer paRazpon ("C1"). Vrednost = "Manj kot"Konec Če |
Besedilo lahko primerjate na enak način (ne pozabite, da je VBA občutljiv na velike in male črke)
