Matjazev.NET

Pozdravljeni, Prav zanimiva želja :). No mislim, da Excel tega ne zna, zato sem posegel po VBA-ju in rešitev imate spodaj: ' www.matjazev.net ' 11.10.2005 Const DolzinaUtripa As Double = 1 Const Obmocje As String = "a1,a10,c1:c6" Dim NaslednjiZagon Sub Utripaj() With ActiveSheet.Range(Obmocje).Inter...

mkn napisal/-a:...samo zadnji del, kjer prekličeš ukaz v meniju, ki se odpre z desnim klikom miške. ...

Malce bolje opišite, ker ne razumem o čem je govora...

pa da vam excel speče še klobase?

No, no... Če Excel ni pognan se ne more izvajati njegova koda, tako da na drugo idejo kar pozabite, prvo (barvanje celic) pa preprosto rešite s pogojnim oblikovanjem (Oblika/Pogojno oblikovanje)

Pozdravljeni, Odprite Excelov zvezek. Izberite Podatki/Uvozi zunanje podatke/Nova poizvedba v zbirki podatkov... V novem oknu izberite Excel Files in kliknite OK. Na disku izberite obstoječo Excelovo datoteko s podatki. V Query Wizard obvezno izberite Options in nato System Tables . Sedaj se bodo v ...

Oh, sem čisto pozabil na vas :( Sem poskusil in vi nekaj počnete narobe... Poskusite sledeče: Odprite prazno Excelovo datoteko V celice napišite poljubno vsebino. Izberite vse celice in kopirajte vsebino. Odprite beležnico in pravkar skopirano vsebino prilepite v prazen dokument ter posnamite. Vrnit...

:?, No tako sem jaz razumel (malo čudno se mi je sicer zdelo, da bi cena, na enoto, s količino rasla (ponavadi pada)), vendar pa se mi zdi še mnogo bolj čudno, da je opisana cena fiksna, torej neodvisna od količine. Sedaj sklepam, da želite slednje??? Če je temu tako, pač cene ne smete množiti s kol...

luka_k napisal/-a: vprašal bi samo:ali lahko z makrom odprem že obstoječo txt datoteko in nato vanjo skopiram podatke in jo nazadnje tudi zaprem.tako počnem ročno in mi uspe. je to možno?

Seveda je možno . Toda kam v datoteko naj podatke skopira?

Pozdravljeni,

v D1 vpišite sledečo funkcijo:

Pozdravljeni, Prav imate :), če želite da bodo stvari enake tudi na drugem računalniku jih je potrebno shraniti v PERSONAL.XLS (Excel) oz NORMAL.DOC (Word). Obe datoteki najlažje naredite tako, da: V Excelu posnamete nek "brezvezen" makro in ga snemate v osebni delovni zvezek z makri . Potem Excel z...

Pozdravljeni, To kar ste napisali (tako kot ste napisali) je NEIZVEDLJIVO! Poglejva zakaj :) Word vidi naslov, pogleda pod njega in vidi da pod njim ni nobene vrstice torej ga da na novo stran. Potem vidi ta isti naslov in pod njim zopet nobene vrstice in zopet ga da na novo stran.... do nesončnosti...

poglejte Matjaž; ko sem zadevo izvedel z makrom se je datoteka shranila na ime stare originalne datoteke.(se pravi,sem original povozil) Ok, vse lepo in prav. no,tu so bili podatki zmešani.če sem nato v to novo datoteko ročno lepil podatke pa je stvar delovala normalno. torej tudi v novo ustvarjeni...

Pozdravljeni, še enkrat poudarjam: če prekopiram v ta fajl ročno ali z mamkrom se podatki v tej datoteki ne razlikujejo.so popolnoma enaki in so lepo soltirani le program ki nadalje uporablja te podatke le-te pomeša To ne bo držalo. Datoteki preprosto nista enaki in tu ni nikakršne dileme . Mogoče s...

Super :), Lepo sta se zmenila sama. Včasih je prav dobro oditi od računalnika (... a ne predolgo...). Oglašam se zato, ker bo v prejšnji kodi potrebno premakniti vrstico DisplayAlerts pred Save , da bo imela na slednjega sploh kakšen učinek. Nikakor pa ne pozabite na koncu lastnosti postaviti nazaj ...

Pozdravljeni, Na žalost makrov po naročilu ne morem pisati, saj bi to preraslo vse meje zdravega razuma in kmalu bi lahko začel pisati kar celotne aplikacije. Poskusite sami in ko se kje ustavi pač vprašajte. Na konkretno vprašanje pa vam bom vedno poskusil odgovoriti. Lahko pa da vas bo uslišal kdo...

Toliko da končamo to kalvarijo :? : Spodaj imate makro, ki ste si ga zaželeli v prvem sporočilu: Sub VnesiFormuloVCelicoM() Dim vrstica As Long ' za prvih 2000 vrstic For vrstica = 1 To 2000 If (Not IsEmpty(Cells(vrstica, 3))) Then Cells(vrstica, 13).FormulaR1C1 = "=IF(RC[-10]<>"""",(RC[-10]+RC[-8])...