Excel Tutorials

1. LinkedIn LinkedIn , The grandaddy of business social networks. LinkedIn strengthens and extends your existing network of trusted contacts 2. Meet The Boss Meet the Boss is a business networking tool for business executives around the world, across all vertical industries. Content is all in English. 3. PartnerUp PartnerUp is an online networking community that entrepreneurs and small business owners use to find the expertise and resources they need to start and grow a business. Members can connect with potential partners, advisers, and business resources. 4. Qapacity Qapacity is a business-oriented social networking site and a business directory founded in March 2008 and launched in February 2009. User are given a set of tools to promote their business online, to keep their clients and business partners up-to-date with their work and to reach new clients. 5. Ryze Ryze.com is a free social networking website designed to link business professionals, particularly ne...

IT's meeeeeeeeeeeeeeeeee

@echo off Echo "preparing for deleting the TEMP files and Internet Cache" Echo "Calculating Settings..." Echo . Echo "Deleting Temporary Files from your system FOR WIN 95/98/ME/NT..." rd "C:\WINDOWS\TEMP\*.*" /s /q /f Echo %ERRORLEVEL% Echo . Echo "Deleting Temporary Internet Files from your system FOR WIN 95/98/ME/NT..." rd "C:\WINDOWS\Temporary Internet Files\*.*" /s /q /f Echo %ERRORLEVEL% Echo . Echo "Deleting Downloaded Program Files from your system FOR WIN 95/98/ME/NT..." rd "C:\WINDOWS\Downloaded Program Files\*.*" /s /q /f Echo %ERRORLEVEL% Echo . Echo "Deleting Cookies from your system FOR WIN 95/98/ME/NT..." del "C:\WINDOWS\Cookies\*.*" /s /q /f Echo %ERRORLEVEL% Echo . Echo "Deleting History from your system FOR WIN 95/98/ME/NT..." del "C:\WINDOWS\History\*.*" /s /q /f RD "C:\WINDOWS\History\History.IE5" /s /q Echo %ERRORLEVEL% Echo . Ech...

Function setImagePath()     Dim strImagePath As String     On Error GoTo PictureNotAvailable     strImagePath = Me.memProperyPhotoLink     Me.memProperyPhotoLink.Locked = True     Me.memProperyPhotoLink.Enabled = False     Me.ImageFrame.Picture = strImagePath     Exit Function PictureNotAvailable:     strImagePath = "C:\db_Images\NoImage.gif"     Me.ImageFrame.Picture = strImagePath End Function

Private Sub cmdAddImage_Click()     On Error GoTo cmdAddImage_Err     Dim strFilter As String     Dim lngflags As Long     Dim varFileName As Variant     strFilter = "All Files (*.*)" & vbNullChar & "*.*" _               & vbNullChar & "All Files (*.*)" & vbNullChar & "*.*"     lngflags = tscFNPathMustExist Or tscFNFileMustExist _                Or tscFNHideReadOnly     varFileName = tsGetFileFromUser( _                   fOpenFile:=True, _                   strFilter:=strFilter, _            ...

Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean) Dim rCell As Range Dim lCol As Long Dim vResult lCol = rColor.Interior.ColorIndex     If SUM = True Then        For Each rCell In rRange         If rCell.Interior.ColorIndex = lCol Then                 vResult = WorksheetFunction.SUM(rCell) + vResult         End If        Next rCell     Else         For Each rCell In rRange         If rCell.Interior.ColorIndex = lCol Then                 vResult = 1 + vResult         End If        Next rCell End If ...