- With Application
- .Calculation = xlCalculationManual
- .ScreenUpdating = False
- End With
Gjoreski | 14.01.2019 15:17 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama da zameni ih sa long |
Avko | 14.01.2019 16:38 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Jesi isprobao primjer od Gjoreskog? ako jesi i radi to je to a ako jesi i opet se smrzne probaj ovo: na pocetku svake funkcije ubaci ovo: PreuzmiIzvorni kôd (Text):
a na kraju svake funkcije ubaci ovo: PreuzmiIzvorni kôd (Text):
ili ovo na pocetku: PreuzmiIzvorni kôd (Text):
na kraju: PreuzmiIzvorni kôd (Text):
mozda ti se excel nije smrznuo vec se zaglavio u nekoj petlji. Mozda je naisao na praznu celiju ili nesto sto ne odgovara uvjetima koji su zadani. Ako napise not response ili tako nesto pritisni Ctrl+Break zaustavice se izvrsavanje koda i stat ce na mjestu gdje se zaglavio. Provjeri celiju koju trenutno obraduje ili red pa ju isto tako provjeri u Listu, sta se u njoj nalazi mozda bi treblao upisati dio koda koji provjerava dali je celija prazna: Do While (Cells(lRow, "A") <> "") ili tako nesto da se osiguramo da ne zaglavi. Mozda nam se cini ponekada da se excel smrznuo no on naporno radi pa zato upotrebljavamo nesto od sljedeceg kod brisanja puno redova kao preventiva od smrzavanja: Application.ScreenUpdating = False Application.Calculation = xlCalculationManual rngCopyRangeVisible.EntireRow.Delete Application.Calculation = xlCalculationAutomatic Application.ScreenUpdating = True |
White Man | 14.01.2019 19:32 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Kad sam zamenio sa long radi malo duze, vidim vise redova kako markira i onda zamrze, a ovo druo kad god ubacim nesto ibaci mi gresku u kodu. Jel mozete da zameniti gde sve treba pa da nakacite ceo kod? Hvala unapred |
Avko | 14.01.2019 19:43 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama prvo kad se zabijeli stisnuti ctrl+break da vidimo gdje se zaustavilo |
Avko | 14.01.2019 21:49 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama PreuzmiIzvorni kôd (Text):
|
Avko | 15.01.2019 11:27 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Jos jedno pitanje: Sadrze li celije neke formule , tipa: =sum() ili nesto slicno? |
White Man | 15.01.2019 11:54 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Nece da radi ovaj kod, odmah izbaci gresko |
White Man | 15.01.2019 12:07 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Nece da mi prihvati sliku da nakacim ne znam sto, kako ubacim pise da vec postoji i da trebam da izbrisem, probao sam i ime da promenim i format ali opet nece a nije ni velika 200KB. Kao gresku pokaze na broju 70 Enf if i markirano je zuto, ispod njega na broju 71 je jos jedno End if. Da ne trebam da obrisem jedno? |
|
Prilozi: Untitled.png (Velicina datoteke:500.98 KB) |
White Man | 15.01.2019 12:12 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Evo sad je prihvatilo sliku. Nema funkcije ni formule, to je lager lista ima naziv artikla, model, boja, cena, stara cena, nova cena, planirana i jos neke kolone. Jel moze uslovno da pokaze duplikate sa vise kolona? Na primer da pokaze duplikate redova koji imaju iste kolone na primer naziv, model, stara cena. Hvala unapred |
Gjoreski | 15.01.2019 13:20 |
---|---|
Predmet:Re: Kako da obrisem redove sa markiranim celijama Postavi primer od tog excela |