Tema
Boje
Pismo
Registracija

Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

Kako se dodaje

Kopiranje reda ako je jedna ćelija obojena

Odgovori Nova tema
Štampanje RSS teme Kopiraj vezu do teme Podeli na Facebook-u Podeli na X-u (Twitter) Idi na poslednju poruku
  • 5 odgovora
  • 2.739 pregleda

Najnovija ↓

Kopiranje reda ako je jedna ćelija obojena 16.01.2012. u 12:02 · pre 180 meseci #1
Kako u excel-u da iz Sheet1 iskopiram u Sheet2, podatke uz uslov da kopiram red koji ima u sebi obojenu jednu ćeliju koja ima broj veći od 0.
Pa ispod njega da se iskopira sledeći red uz isti uslov da ima obojenu jednu ćeliju koja je veća od 0, itd...
Re: Kopiranje reda ako je jedna ćelija obojena 16.01.2012. u 12:41 · pre 180 meseci #2
U kojoj verziji radiš? Od Excela 2007 imaš mogućnost filtriranja po boji ćelije: radi isto kao sa podacima.
Potpis
Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!
Re: Kopiranje reda ako je jedna ćelija obojena 16.01.2012. u 13:13 · pre 180 meseci #3
OK Hvala uspeo sam da uradim sa 2007. Završen posao.

Isto pitanje samo sa zamenjenim uslovom čisto informativno možda zatreba, a već sam pokrenuo temu.

Kako u excel-u 2003,XP da iz Sheet1 iskopiram u Sheet2, podatke uz uslov da kopiram red uz uslov (npr. da ćelija E>100).
Re: Kopiranje reda ako je jedna ćelija obojena 17.01.2012. u 01:46 · pre 180 meseci #4
ovo bi trebalo da radi
Code:
Sub kopiraj()

Sheet1.Range("E1:E300").Select
For Each celija In Selection
If celija.Value > (100) Then
celija.Select
ActiveCell.Copy
Sheet2.Activate
Sheet2.Range("A1").Select
Range("A65536").End(xlUp).Offset(1, 0).Select

Selection.PasteSpecial Paste:=xlPasteValues, _
     Operation:=xlNone, SkipBlanks:=False, Transpose:=False
     Application.CutCopyMode = False
Sheet1.Activate

End If
Next celija
End Sub



Potpis
djole
Re: Kopiranje reda ako je jedna ćelija obojena 24.01.2012. u 15:43 · pre 179 meseci #6
Evo na brzaka primer u prikacenom fajlu. Cim budem imao vremena postavicu efikasnije resenje istog problema,
odnosno modifikovacu makro od 3okc koji je neuporedivo brzi.
Potpis
djole
PRIMER.xls39.5k
Odgovori
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme