Re: Razeni datumu Excel 2000

Ahoj Alexi

skvele makro, dekuji moc.

Ciste nahodou, pokud bys mel ve svych makrech jeste to, ktere by delalo to,
ze pokud bunka ve vyberu ma minusove znamenko na konci, prehodi jej na
zacatek.

Cili reseni pro ty napr.SAP vystupu, kdy dostanes textovy seznam ve stylu:

1.234,10
5.432.21-

a to druhe je samozrejme minus.

Ja to upravuji stylem ve vyberu ctrl+H vymen tecku za nic

pak bych aplikovala to "minus dej na zacatek'

a nakonec to makro, co jsi popsal nize.

Dekuji moc

Simona



On 3/9/06, AleX <faklabrejle@gmail.com> wrote:
>
> cafte ludia, bud pouzijete ten doplnok co spominala Simona v polemike
> (teda naposledy)
> alebo si vlozte toto makro do osobnych makier v MSExcel
> ---------------------cut ---------------------
> Private Sub conwertSAP()
> For Each myCell In Selection
>    On Error Resume Next
>    If myCell <> "" Then
>        myResult = myCell * 1
>        If Err.Number = 0 Then
>            myCell.Value = myResult
>        Else
>            Err.Clear
>        End If
>    End If
> Next
> End Sub
> --------------------end cut ---------------------
> ako podla nazvu vidite vyuzival som to v davnych dobach kedy excel
> este nevedel nic robit so zapornymi hodnotami zo SAP-u (minus na
> konci)
> vyhoda makra ... ak je hodnota bunky nasobitelna cislom jedna je to
> cislo a potom vloz do bunky hodnotu a nie text.
>
> pouzitie
> oznacit si oblast (najlepsie pomocou mysi) a spustit makro ....
> uzite v zdravi
>
> On 3/9/06, Technik IS <tis@nspka.cz> wrote:
> > Díky všem za rady. Ten přetrvávající text zní pravděpodobně.
> > To však zjistím až zítra.
> > Jestli máš Milane ještě nějakou radu, tak sem s ní. Rád se přiučím
> >
> > Rad
> >
> > MilanK napsal(a):
> > > Ak by si tam mal ten nezelany a neviditelny format "text", tak by som
> > > ti vedel poradit, ale az vecer. Teraz uz musim padat...
> > >
> > > MilanK
> >
> --
> AleX
>