Excel

Nukopijuok formule..Nereikes rasineti ranka

Labai aciu tau, Artai

Esmė tame, kai padarau COPY, tai kitoje eilutėje rašo tą patį sheet'ą, tik kitas eilutes, tai tenka ranka vėl redaguoti, o as noreciau sužinoti, ar yra tokia operacija, kad sheet'as eitų didėjančia tvarka, o eilutės liktų tos pačios

Sveiki kolegos,

Reikia pagalbos.
Pabandykit ir parašykit ar veikia pas jus šis kūrinukas.

Nolina PPK PIK kvitas_lt 2.1.xls

Žavu

Pagyrūnė
Kažkada jau siuntei, nes jau mažiau panašų labai.

Labai žavu:).

Net gaila, kad man nereikia:).

Jei ir kiti tokie nedėkingi ir zanūdos, tai gausiu barti už žiaurų elgesį
su gyvūnėliais:(.

Na o kas padesit.

to Wolf:

nesugalvoju jokio lengvo sprendimo. galima funkcijų pagalba bandyti spręsti, bet bus gremėzdiška ir nelankstu. atrodo tokiam atvejui nėra jokios numatytos funkcijos ar kt sprendimo. na, jei man visgi reiktų kaip nors pasiekti rezultatą, realizuočiau tai VBA pagalba (nzn ar tau tai priimtina).
Tai va. susikuri naują modulį, patalpini žemiau nurodytą kodą:

Public Function Last(r As Range)
Dim i As Integer

For i = Application.ThisCell.Column - 1 To 1 Step -1
If Not IsEmpty(Cells(Application.ThisCell.Row, i)) Then
Last = Cells(Application.ThisCell.Row, i)
Exit Function
End If
Next i
End Function

rezultato ląstelėje, sakykime A11 renki formulę:
=last(A1:A10)

čia A1:A10 - grupė ląstelių (eilutė), iš kurių dešiniausiai esantį skaičių funkcija turi grąžinti.

Ačiū Werti,
Dar klausimas - dėl ko gali išsipusti failo dydis (XLS) ?
Paimtas failas - kuris sveria apie 63 Kb.
Pagrazinamas - na ir padidėja iki beveik 2 MB ?
Nesamone kažkokia ieškau ieškau kagi tokio padariau - niekas į galvą neateina padėkit

Buvo padaryti veiksmas - Pažymeti visos tuščios Cells ir padaryta Clear All, Delete, bet niekas nepadeda.

Galiu atsiusti el. pastu pasiziureti. Pabandysiu ikelti cia. Copy2.zip

kazin ar yra kitokia galimybe logotipui excelyje padaryti - kaip Nolinos ppk kvite, kad nebutu jis su ta melyna juosta bei uzdarymo kryzeliu, o svarus tam tikras piesinukas

Aijajajai ka daryti? failas atsidares parodo forma kurioje nera jokiu mygtuku ir uzdarymo x kryziukas taip pat neaktivuotas, per shift-a nepasileidzia be formos, faila uzdaryti eina tik per ctrl+alt+del. Gal yra minciu kaip patekti i VBA sio failo ?

bandyk uždrausti macro paleidimą ir tada paleisti failą

Wertis dekui tau....mon tai didele pamaceje...jau zadejau grizti prie dvieju savaiciu darbo atgal. Aciu tau

nepamiršk ateity retkarčiais pamačyti kitiems

To A_Arvis:
No vat kap faine, kad tep gera baigies .
P.s. atsiprašau už komentarą, bet neiškenčiau - senokai gimta kalba kalbėjau.

Veizek i ne mon veinam gera bovo

To: Wertis
tai kad as kaip suo, suprasti suprantu (nedidele dali komandu), nu bet pasakyti tai diziule problema ir kita vertus vakarais cia neber ka veikti

Tarp suprantančių apie kompus, gal atsiras kas gali atidaryti tą failiuką. Man atidarius nesamones rodo. Labai pagelbėtumėt. UOZ.XLS

Kazkada turejau ir as toki faila. Is blogo foopiko nukopijoti dave bet atidarinejo taip pat... Laikiau ji apie pusmeti vis buvo gaila jo, bet teko ji palaidoti be jokiu ceremoniju. Nezinau gal kas nors ir sugeba Atstatyti, bet man nesekesi.

..deja