Jste zde: Úvodní stránka » excel » vba-listy-bunky » zapis-udaj-do-bunky-excel-vba

Excel VBA - zapiš údaj do buňky

Úvodem

Jak do konkrétní buňky zapsat nějaký údaj? V následujících příkladech je několik možností.

Příklad makra 1

Tradiční úkol. Do buňky A1 makro zapíše "Ahoj světe".

Sub Zapis()
     Cells(1, 1) = "Ahoj světe."
End Sub

Příklad makra 2

Trochu složitější požadavek. Makro zapisuje do příslušného řádku a sloupce údaj, o který řádek a sloupec jde.

Sub popisuj()
For i = 1 To 9 For j = 1 To 3 Cells(i, j) = "Řadek: " & i & " - Sloupec " & j Next j Next i End Sub

Ukázka:

Příklad makra 3

Makro vyplní více buněk požadovaným textem.

Sub Vicebunek()
     Range("A1, A3, A5") = "Ahoj!"
End Sub

Sub Vicebunek2()
     Range("A1:B5") = "ABECEDA"
End Sub

Příklad makra 4

Pomocí makra zapište údaj do určité buňky ve vybrané oblasti.

Sub Dobunky()
     Range("A1:C5").cells(8) = "ZYZ"
End Sub

Toto je trochu složitější úvaha. Zápis se provádí do x-té buňky ze zadaného rozsahu.
V naší výběrové tabulce má první řádek pozice:
1 2 3 4 5
druhý řádek pozice:
6 7 8 9 10
třetí řádek pozice:
11 12 13 14 15 16
Náš požadavek je zapsat požadovanou hodnotu do pozice (buňky) 8.

Závěr

Údaje makro v MS Excel zapisuje na aktuálním listu v aktuálním sešitu. Pokud budete chtít makrem provést zapis na jiný list (sešit), je potřeba kód doplnit o adresu daného listu (sešitu).

Článek byl aktualizován: 24.01.2012 19:54

---

---

Další články k tématu

• Jak vybírat (označovat) buňky
• Zapiš údaj do buňky - právě čtete
• Zapiš vzorec (funkci) do buňky
• Datum a čas - nastavit formát
• Přečti údaj z buňky
• Range objekt - oblast buněk
• Resize Offset - změna oblasti buněk
• Řádky a sloupce ukázky kódu
• Zobrazit - Skrýt, řádky - sloupce
• Prázdné buňky - zjistit
• Komentáře co vše lze provádět
• Zamykání/odemykání buněk - Protect/Unprotect

Komentáře

Za obsah komentářů neodpovídám, jelikož jsou komentáře publikovány ihned po jejich napsání čtenářem. Toto nemohu nijak ovlivnit. Přesto si vyhrazuji možnost jakýkoli neslušný komentář smazat bez udání důvodu.

Nejnovější článek

Nejčtenější článek