Korisni Excel saveti i trikovi

• 1Ovo se svidja korisniku: mcrule
  
  Registruj se da bi pohvalio/la poruku!

Ovo je tema gde možemo da podelimo neke Excel savete, trikove ili mini rešenja za neke zahteve.
Ako želite da podelite sa nama neki savet, napišite na kojoj verziji Excela ste to probali.

Ukoliko imate dodatna pitanja u vezi ovih mini tekstova, otvorite novu temu, cilj je da ova tema bude što "čistija" od offtopica.




INDEX

- Formiranje datoteke koja se sastoji samo od vrednosti --> LINK

- Filtriranje podataka, da pokazuju 15-minute vrednosti --> LINK

- Dodavanje jednog praznog reda nakon svakog reda --> LINK

• 1Ovo se svidja korisniku: mcrule
  
  Registruj se da bi pohvalio/la poruku!

Ukoliko imamo više međupovezanih Excel datoteka i želimo nekome da pošaljemo tabelu koja se sastoji samo od vrednosti, možemo da uradimo sledeće:

- svaki Excel sheet kopiramo i preko Paste special zalepimo samo Values
- ili iskoristimo sledeći makro koji će to da uradi automatski za nas, za sve sheetove.

Sub SaveAsValuesOnly()
Dim wSheet As Worksheet

On Error Resume Next
For Each wSheet In Worksheets
With wSheet.UsedRange
.Copy
.PasteSpecial xlPasteValues
End With
Next wSheet
Application.CutCopyMode = False
On Error GoTo 0
Application.Dialogs(xlDialogSaveAs).Show

End Sub


* Radi na Excel 2007. i 2010. (nisam probao na ranijim)

• 1Ovo se svidja korisniku: mcrule
  
  Registruj se da bi pohvalio/la poruku!

Kako da filtriramo podatke, da se prikazuju vrednosti samo na 15 minuta


Postojece stanje:



Dakle, imamo ovakvu tabelu (koja ima nekoliko hiljada unosa), i potrebno je izbaciti sve redove, osim onih koji odgovaraju merenjima na 15 minuta. Rucno brisanje suvisnih redova bi bilo vrlo komplikovano.


Jedno od resenja je sledece:

- otkucati funkciju koja ce proveriti da li je broj deljiv sa 15:
=MOD(MINUTE(A2),15)=0
// funkcija vraca TRUE ili FALSE



* funkciju prevuci u sva polja klikom na krstic u donjem desnom uglu celije.

- napraviti filter, koji prikazuje samo true vrednosti; klik na tab Data i na dugme Filter, oznaciti kao na slici:




Rezultat:




* Urađeno na Excelu 2010.

• 1Ovo se svidja korisniku: mcrule
  
  Registruj se da bi pohvalio/la poruku!

Tip: Makro

Program: Excel 2010

Namena: nakon svakog reda, dodaje po jedan prazan

VB kod:

Sub insertrow()
 ' insertrow Macro

 Application.ScreenUpdating = True
 Dim count As Integer
 Dim X As Integer

 For count = 1 To 20
 If activecell.Value <> "" Then
 activecell.Offset(1, 0).Select
 Range(activecell, activecell.Offset(0, 0)).EntireRow.Insert
 activecell.Offset(1, 0).Select
 For X = 1 To 1
 Next X
 Else
 activecell.Offset(1, 0).Range("a1").Select
 End If
 Next count

 End Sub

Korisni linkovi:
http://msdn.microsoft.com/en-us/library/office/ee814737(v=office.14).aspx
http://www.mrexcel.com/forum/excel-questions/48712-insert-blank-row-into-every-other-row-selected-list.html

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Evo jedan kratak kurs osnove eksela za pocetnike, ko trazi posao pa mu traze odlicno da pogleda:

[Link mogu videti samo ulogovani korisnici]