Poslao: 17 Sep 2013 07:31
|
offline
- Fil
- Legendarni građanin
- Pridružio: 11 Jun 2009
- Poruke: 16586
|
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
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
Poslao: 17 Sep 2013 07:34
|
offline
- Fil
- Legendarni građanin
- Pridružio: 11 Jun 2009
- Poruke: 16586
|
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)
|
|
|
|
|
Poslao: 17 Sep 2013 07:46
|
offline
- Fil
- Legendarni građanin
- Pridružio: 11 Jun 2009
- Poruke: 16586
|
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
|
|
|
|
Poslao: 10 Apr 2015 20:17
|
offline
- Stech-
- Novi MyCity građanin
- Pridružio: 24 Mar 2015
- Poruke: 4
|
Evo jedan kratak kurs osnove eksela za pocetnike, ko trazi posao pa mu traze odlicno da pogleda:
youtube.com/watch?v=YpCjk35R5GM
|
|
|
|