check out these links see if it helps you
http://www.informit.com/articles/article.aspx?p=366892# http://it.toolbox.com/blogs/sap-bi-blog/using-bex-analyzers-api-via-vba-39052 http://www.your-save-time-and-improve-quality-technologies-online-resource.com/win32-vba-api.html Sub Clear_Temp_Files() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8 " End Sub Sub Clear_Cookies() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2" End Sub Sub Clear_History() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1" End Sub Sub Clear_Form_Data() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16" End Sub Sub Clear_Saved_Passwords() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32" End Sub Sub Clear_All() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255" End Sub Sub Clear_Clear_Add_ons_Settings() Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 4351" End Sub ---- will help in getting computer name Public Declare Function GetComputerName Lib "kernel32" _ Alias "GetComputerNameA" _ (ByVal lpBuffer As String, nSize As Long) As Long Function ReturnComputerName() As String Dim rString As String * 255, sLen As Long, tString As String tString = "" On Error Resume Next sLen = GetComputerName(rString, 255) sLen = InStr(1, rString, Chr(0)) If sLen > 0 Then tString = Left(rString, sLen - 1) Else tString = rString End If On Error GoTo 0 ReturnComputerName = UCase(Trim(tString)) End Function Sub DsplyComputerName() MsgBox ReturnComputerName, vbOKOnly, "Computer Name" End Sub ---- will help in getting user name Public Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _ (ByVal lpBuffer As String, nSize As Long) As Long Sub currentuser() Dim lpBuff As String * 25 Dim ret As Long, UserName As String ret = GetUserName(lpBuff, 25) UserName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1) MsgBox UserName, vbOKOnly, "Current User Name" End Sub On Tue, Jan 4, 2011 at 2:10 AM, hanumant shinde <hanumant_5...@yahoo.co.in>wrote: > Hi friends, > > i want to know about macros which includes APIs. > i know little about APIs but i have never used them in my code. > i want to know how can i start with it. where can i get info about it and > how can i explore. > i was rejected in 1 interview bcoz of this API. :( > > Thanks, > Hanumant > > -- > > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts > -- *Regards* * * *Ashish Koul* *akoul*.*blogspot*.com <http://akoul.blogspot.com/> *akoul*.wordpress.com <http://akoul.wordpress.com/> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830> P Before printing, think about the environment. -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
