From: Likavcan, Alexander (Alexander.Likavcan@volkswagen.sk)
Date: 26. 02. 2003, 09:16 CET
Zdar a silu David, dna 26.02.2003 si napisal(a): > Zdravim > > mam makro ktere prenasi text z jedne bunky do druhe > if len(Range("poznamka")) < 255 Sheets("seznam").Cells(10, "w").value = Range("poznamka") else poznamka1=left(Range("poznamka"),255) poznamka2=mid(Range("poznamka"),256,255) Sheets("seznam").Cells(10, "w").value =poznamka1 & poznamka2 end if > ale toto mi prenese pouze text ktery nema vice jak 255 znaku. > > Cim muzu toto nahradit ? > > nepotrebuji asi nic ve stylu ----- zkopirovat ----vlozit------ > protoze nektere sloucene bunky prenaseji text do nesloucenych > a nazpatek . > > je to takova mensi databaze a nechce se mi to predelavat do accesu > > Diky > > David Lehner > > > pisem to z ruky ale malo by fachcit, ak nie tak sa ozvi s pozdravom AleXXX -- Remember: there are no strangers in the world, only friends who have not yet met.
This archive was generated by hypermail 2.1.6 : 26. 02. 2003, 09:33 CET