Příspěvky uživatele


< návrat zpět

Strana:  « předchozí  1 2 3 4 5 6

To jo 1 na zaciatku som potreboval len zozrtiedit jeden stlpec podla zadanej hodnoty.

Dik za priklad 4

Ahoj prikladam priklad snad to dava nejaky zmysel 7
Nieco uz mam rozdelane uvidim k comu dospejem.

Dalsim napadom sa nebranim 1

jj to de ale len pokial v danych bunkach nieje vzorec. potrebujem aby sa to vzdy pri zmene v stlpci vse automaticky menilo

Ahoj mam mensi dotas. V tabulke npr. A2 az A52 su zadane hodnoty nie vsak v kazdej bunke. Potrebujem nejak filtrovat data do inej tabulky bez praznych buniek slo by to ? 2

Diky moc ...ani nevies ako si my pomohol 1
Este ras dik ..

otazka znie jak to zapsat 6

jde o to ze ak sa pomylis a adklepnes zapsat tak sa nevedia vratit. preto tam chcem nacpat makro na smazanie poslednych hodnot. nejak sa nedary som do toho lama 7

Zdravim som zaciatocnik potrebujem nejak udelat makro na smazanie poslednych zadanych hodnot. Tieto hodnoty sa zapisuju vzdy podseba. makro na zapis nejak takto :

Sub zapsat()

'

'
Dim hodnota(6)

hodnota(0) = Cells(4, 15)
hodnota(1) = Cells(5, 15)
hodnota(2) = Cells(6, 15)
hodnota(3) = Cells(7, 15)
hodnota(4) = Cells(8, 15)
hodnota(5) = Cells(9, 16)

Dim rd As Single

rd = 62

Do While Cells(rd, 1) <> ""
rd = rd + 1

Loop:

Cells(rd, 1) = hodnota(0)
Cells(rd, 2) = hodnota(1)
Cells(rd, 3) = hodnota(2)
Cells(rd, 4) = hodnota(3)
Cells(rd, 5) = hodnota(4)
Cells(rd, 6) = hodnota(5)

End Sub

3


Strana:  « předchozí  1 2 3 4 5 6

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Hromadné přepsání

elninoslov • 24.5. 10:29

Hromadné přepsání

Nomi • 24.5. 8:32

Index - každý rok začít od 1 Power Query

Alfan • 23.5. 9:17

nepřímý odkaz

elninoslov • 23.5. 0:00

nepřímý odkaz

bordov • 22.5. 18:35

vrácené hodnoty

Anonym • 22.5. 15:46

vrácené hodnoty

Anonym • 22.5. 15:45