klo udh ga mgkn solve.. mending pesen aje..he..he... peace deyy bang edy.. :)
Pada 6 September 2011 15:03, Edy <murid.belajaraccess@yahoo.co.id> menulis:
Program ini dijalankan kalau tangan sudah pegel rename manual.
Kalau masih bisa manual, gak usah pake program.
Ntar dimarahin loh... :)> On Tue, Sep 6, 2011 at 10:29 AM, Edy <murid.belajaraccess@...>wrote:
--- In belajar-access@yahoogroups.com, Haer Talib <haertalib@...> wrote:
>
> hehehe.. pake program :)
>
>> --
>
> > Silahkan taruh ini di module.
> > lalu jalankan.
> > Gunanya untuk menghilangkan tulisan "dbo_" tsb.
> >
> > Sub RenameDBO()
> > For Each tbl In CurrentDb.TableDefs
> > If Left(tbl.Name, 4) = "dbo_" Then
> > NewName = Trim(Replace(tbl.Name, "dbo_", ""))
> > DoEvents
> > DoCmd.Rename NewName, acTable, tbl.Name
> > End If
> > Next
> > End Sub
> >
> >
> > Semoga bermanfaat.
> >
> > Edy Wiyono
> >
> >
> >
> > ------------------------------------
> >
> > SPAM IS PROHIBITEDYahoo! Groups Links
> >
> >
> >
> >
>
>
>
>
> Haer Talib
>
> *RumahAccess Indonesia* <http://www.rumahaccess.com>
> *Tempatnya Belajar Microsoft Access*
> Artikel | Forum | Milis | Download | Training | Links | Blog | Event
>
__._,_.___
SPAM IS PROHIBITED
MARKETPLACE
.
__,_._,___
Tidak ada komentar:
Posting Komentar