Prijavi se z GoogleID

» »

Prosim za pomoč - Excel

Prosim za pomoč - Excel

mp5 ::

Pozdravljeni!

Prosim vas za pomoč pri pretvorbi vrednosti v Excelovi tabeli. Določeno obdobje bi rad spremenil v besedilo. Primer:



Omenjeni zapis bi rad spremenil v sledeče: Janez Novak: januar, februar, marec....2000, januar, februar, marec...2001...junij 2018

Dejansko ni potrebe po letnici v zapisu, ker slednjo lahko vnesem ročno. Rad bi, da se datumsko obdobje spremeni v besedilo.

Je to mogoče?

Za vse nasvete in pomoč se vam vnaprej zahvaljujem. Lp

rokp ::

Format cells, izberes Custom in vpises mmmm yyyy

mp5 ::

Mogoče nisem bil dovolj razumljiv.

Zgornji zapis bi rad spremenil v to:



Prej sem pozabil napisati, da bi bilo idealno, da je med meseci ločilo (vejica) in da bi zadnji stolpec seštel mesece zaposlitve.

Hvala

reeves ::

Tole je pa res čudna želja. In vsi meseci naj bi bili v isti celici? A lahko vprašam zakaj mora biti ravno takšna oblika zapisa. Se mi zdi, da bi rad dosegel nekaj, kar se da tudi na drugačen način. Štetje mesecev zaposlitve ni problem (=DATEDIF(B2;C2;"m").

mp5 ::

Da, v eni celici. Zadevo bi rad skopiral v WORD. Hvala

rokp ::

Naredis .xlsm datoteko, pritisnes Alt-F11, izberes Insert->Module, pastas spodnjo kodo (na hitro spackana, bi morala biti enostavno berljiva, ce je potreben kaksen popravek), za polja uporabis =razpon(B2;C2)

Function razpon(first As Date, last As Date)
    Dim d As Date
    d = first
    Dim s As String
    s = Mesec(DatePart("m", d))
    While d < last
        d = DateAdd("m", 1, d)
        s = s & ", " & Mesec(DatePart("m", d))
        If DatePart("m", d) = 12 Or d >= last Then
            s = s & " " & DatePart("yyyy", d)
        End If
    Wend
    razpon = s
End Function

Function Mesec(i As Integer) As String
    Select Case i
        Case 1
            Mesec = "januar"
        Case 2
            Mesec = "februar"
        Case 3
            Mesec = "marec"
        Case 4
            Mesec = "april"
        Case 5
            Mesec = "maj"
        Case 6
            Mesec = "junij"
        Case 7
            Mesec = "julij"
        Case 8
            Mesec = "avgust"
        Case 9
            Mesec = "september"
        Case 10
            Mesec = "oktober"
        Case 11
            Mesec = "november"
        Case 12
            Mesec = "december"
    End Select
End Function

mp5 ::

Zdravo!

Nikoli še nisem pretvarjal dokumeta v .xlsm datoteke, prav tako še nisem nikoli delal z Microsoft Visual basic orodjem. Sem pregledal nekaj videov in poskušal, vendar mi ne gre. Mi lahko prosim bolj detajlno opišeš postopek oz. me vodiš skozi postopek. Hvala

rokp ::

Dokument shranis kot .xlsm - tam, kjer vpisujes ime datoteke (Save As), imas sedaj verjetno spodaj napisano "Excel Workbook (*.xlsx)", namesto tega izberes "Excel Macro-Enabled Workbook (*.xlsm)". V slovenskem Excelu so verjetno izrazi malenkost drugacni.
Ko imas .xlsm odprt, pritisnes Alt-F11, odpre se ti "Microsoft Visual Basic for Applications".
V meniju "Insert" izberes "Module", odpre se ti novo okno, kamor prilepis zgornjo kodo, nato pa v tabeli v ciljno polje vpises formulo "=razpon(celica_s_prvim_datumom;celica_z_zadnjim_datumom)".

mp5 ::

Super :) Dela! Res hvala. Lp

rokp

Prosim poglej še zasebna sporočila. Hvala

Zgodovina sprememb…

  • spremenil: mp5 ()


Vredno ogleda ...

TemaSporočilaOglediZadnje sporočilo
TemaSporočilaOglediZadnje sporočilo
»

Excel obfuscation

Oddelek: Programska oprema
141200 (895) SeMiNeSanja
»

[Excel]Vrednost celice = ime dokumenta

Oddelek: Programska oprema
313536 (2958) veteran
»

Visual Basic in Excel

Oddelek: Programiranje
261842 (1408) Vesoljc
»

Excel vprašanje

Oddelek: Programiranje
8750 (649) matic
»

Kako v excelu shraniti kot sliko?

Oddelek: Programska oprema
261494 (1193) Slavček

Več podobnih tem