• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: UsedRange

Zaslal/a Tguun 19.8.2010 14:39

Zdravím starousedlíky, měl bych na ás dotaz jak vyřešit problém při zápisu dat. Problém je kódem

Sheets("List1").UsedRange.Rows.Count +1

Takto se zapisují jednotlivá data do příslušných řádků po sobě, jenže problém je při prvním zápise, kdy se mi vyplní řádek nahodile a ne tam kam chci.
Zkoušel jsem to upravit po svém ,ale bez výsledku.

Dim radek_primarni As Single
Dim radek_zapis As Single

rd_primarni = 2 + 1 (když bych chtěl začínat zápis na třetím řádku)

rd_zapis = Sheets("List1").rd_primarni.Rows.Count + 1

Děkuji za opravu nebo vyřešení.

S pozdravem

Zaslat odpověď >

---

Začátečník(19.8.2010 18:03)#002220

Netuším jaký problém přináší
Sheets("List1").UsedRange.Rows.Count +1

Stejně tak netuším jak se zapisují jednotlivá data do příslušných řádků po sobě.

Celkově - dosti zmatený dotaz.
Nicméně Sheets("List1").UsedRange.Rows.Count +1 vrací hodnotu posledního použitého řádku zvýšenou o +1 - v tomto případě.

rd_zapis = Sheets("List1").rd_primarni.Rows.Count + 1 nedává vůbec žádný význam a takováto funkce není ve VBA platným příkazem. Proměnná rd_primarni je v tomto zápise zcela nesmylná - obsahuje číslo.citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse