To jo na zaciatku som potreboval len zozrtiedit jeden stlpec podla zadanej hodnoty.
Dik za priklad
Ahoj prikladam priklad snad to dava nejaky zmysel
Nieco uz mam rozdelane uvidim k comu dospejem.
Dalsim napadom sa nebranim
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 ?
Diky moc ...ani nevies ako si my pomohol
Este ras dik ..
otazka znie jak to zapsat
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
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
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.