[lightbluefox]

Ühesõnaga mul on eksli tööleht koostatud valemitega, mis kasutavad algandmeteks teist töölehte.
Kuna andmeid võib olla väga palju või väga vähe, siis on igaks juhuks terve leht nendega täidetud nagu allpool näha:



Kui ma teen makroga aga range, mis kõik info sisse võtab mis seal töölehel on (fixed max range), tulevad sisse ka valemiväljad, kuna need on ju täidetud cellid eksli jaoks.
Kui nüüd terve range aga tõsta txt faili, siis on osa nö nähtamatu, aga arvutile siiski loetav ja rikub tulemuse ära.

Kuidas saaks teha nii, et valemiosa txt faili ei jääks, vaid ainult reaalsed read mis ka pildil näha? Kuidas ta peaks suutma eristada, et see väärtus mis ta teiselt lehelt toob on see mis on väärt salvestamist?

Igasugu haidimised ja peitmised peidavad vaid silma jaoks, teksti faili kopeerides on ikka kõik strktuur näha, mis sest et teksti ennast mitte.

[infidel]

Kuidas sa täpselt seda tekstifaili moodustad? Kui koodi sees, siis pane lihtsalt filter vahele, .value <> "" peaks toimima.

[lightbluefox]

Natuke jään siin nüüd hätta, vbs on selline, kuidas see süntaks peaks välja nägema mis faasis ta peaks seda eraldust tegema?

[Renka]

Range max väärtuseks pane viimane rida kus on reaalselt väärtus välja kuvatud. Hetkel on sul ju käsitsi paika pandud, et range on igal juhul 1000 rida

[lightbluefox]

Aga nagu ma ütlesin, andmete arv muutub, kord on 10, kord 800 rida, see tähendaks, et iga kord tuleks seda makros muuta (mis muudab ta suuresti mõtetuks), või teha mingi counter, mis loeb read mingi teise tingimuse asemel (nt kui palju on ridu kus on "NT" kuvatud, st eksisteeriv rida) ja võtma rangeks just selle arvu ridu...

[Renka]

Võtad viimase rea kus on non empty väärtus. Valemit ei oska peast anda aga see on igati võimalik.

[tiit97]

Kasuta:

ActiveSheet.UsedRange.Rows.Count

[lightbluefox]

See nõuab objekti, oskad ehk siis ka seda koodi sisse paigutada?

Ma sain asja tööle teistmoodi, aga väga ümbernurgalahendusega, määrasin .Cells-iga alguspunkti (1, 1) ja katse eksituse meetodil tuvastasin, et teist .cells kasutades saab anda talle ette teise lahtri, mis ei ole aga range lõpp, vaid too lahter sisaldab hoopis tegeliku range lõpu aadressi (inception!), selle sain kui liitsin kokku countAga lahtrid esimes veerus ja lahutasin blank cellid, juurde tekstina veerg ja nii kokkukleepides moodustuski veeru nimi ja number. Üsna jube...

[alfreedo]

Proovi seda: