Friday, December 19, 2008

Quicker Way to Launch Program

Windows Vista assigns shortcuts to all the items in your Quick Launch toolbar, on its own, depending on the icons� positions in the sequence. So if you want to open the program whose icon is the fourth in your Quick Launch bar, just press the Windows key + 4.

Resize Icon of Desktop on fly in XP Vista

Resize icons on the fly :

If you want to resize the icons quickly in Windows Vista Explorer, press and hold the Ctrl key, and scroll up or down with the mouse wheel

Backingup Microsoft Outlook Autocomplete List

Backing up the Microsoft Outlook auto complete list is indeed possible and easier than you think.

From a users standpoint, there are very few things more important than the auto complete ability of Microsoft Outlook. As a matter of fact, should those auto complete addresses be lost, most users would be more than willing to beat the tar out of any IT guy that comes too close. Oddly enough, most IT staff aren’t aware that this auto complete list can be backed up with relative ease. The auto complete information is actually stored in its own file which can be backed up and transferred to another computer if necessary. This file is located at C:\Documents and Settings\username\Application Data\Microsoft\Outlook\profilename.nk2.

How to type Hindi and ગુજરાતી in Windows Xp and Windows Vista

 : How do I type in Gujarati Unicode on my computer ? I have a windows XP as an operating system on my computer.

Following step will work ONLY if you have Windows XP (it does not matter whether you have Home edition or Professional edition). If you don’t have win XP, please don’t trouble yourself. Keep Win XP Installation CD ready with you.

STEPS

01. Go to Start > control panel > Date Time Language and Regional Options > Regional and language Options. 

02. Once open, click on the languages tab and in the bottom half select both check boxes for support for east asian language and right-to left language.

03. A box will pop up that will tell you that you will need some space 230 MB or something. Click ok. And then click apply. 

04. It will ask for Windows XP CD. Put in CD drive or give path. At the end of the file copy, it will tell you to restart. Do it.

05. Upon reboot, Go again to Start > control panel > Date Time Language and Regional Options > Regional and language Options.

06. Once open, click on the languages tab and in the top half select Details in Text service and Input languages.

07. Text service and Input Language box has two tabs. In the settings tab in the second half of installed service Add > (in the box that opens select Input language as Gujarati and keyboard as Gujarati) and then click OK. You will be back on 'Text Service and Input Language' window.

(Note: If you don't find Gujarati here, you haven't correctly followed above steps. You can also select Hindi or Devnagari in step 7 the same way.)


08. Now go to Preferences > Language Bar > make sure that first and third checkbox are selcted : 'Show the language bar on the desktop' and 'Show additional Language bar icon on the desktop'. 

(Note: They should be selected by default. If not select them)

09. Go to Key settings > Make following selections

To Turn off CAPS LOCK > Press CAPS LOCK (natural choice !)

Click Hot Keys for Input Language and

Key sequence for Change Input Language : Control + Shift key

(so If you accidentally hit this combination, your language will change!)

10. Click OK. You will be once again on 'Text Services and Input Languages window. Ok and close all windows. You are done !
Verify that it works !

- Open Microsoft word, type K C N …it will show up as kcn. 

- Next, either use left Control + Shift or select language from small icon on the task bar on your desktop to change language (you should see in your taskbar the two letters change from EN to GU ) 

- Type same keys K C N ..you should see કમલ . 

- Change back to English and verify that same key shows K C N ! 

 

Welcome to the world of Gujarati on net !

Capture rapnge in Worksheet as Picture

To capture the range as an image use

range("A1:C10").CopyPicture xlScreen,xlBitmap 

To do this manually select the range A1:C10 and the whilst holding the shift key use the menu Edit. You should see a new menu item Copy Picture. The dialog allows you to specify picture or bitmap, screen or printer version.

Wednesday, December 3, 2008

List All the Name and other Information of the File in Folder and Sub Folder

The following Macro lists the all detail of the file in folder and subfolder

'*****************************************************************

Sub TestListFilesInFolder()
  Workbooks.Add ' create a new workbook for the file list
  ' add headers
  With Range("A1")
  .Formula = "Folder contents:"
  .Font.Bold = True
  .Font.Size = 12
  End With
  Range("A3").Formula = "File Name:"
  Range("B3").Formula = "File Size:"
  Range("C3").Formula = "File Type:"
  Range("D3").Formula = "Date Created:"
  Range("E3").Formula = "Date Last Accessed:"
  Range("F3").Formula = "Date Last Modified:"
  Range("G3").Formula = "Attributes:"
  Range("H3").Formula = "Short File Name:"
  Range("A3:H3").Font.Bold = True
  ListFilesInFolder "C:\FolderName\", True 
  ' list all files included subfolders
End Sub


Sub ListFilesInFolder(SourceFolderName As String, IncludeSubfolders As Boolean)
' lists information about the files in SourceFolder
' example: ListFilesInFolder "C:\FolderName\", True
Dim FSO As Scripting.FileSystemObject
Dim SourceFolder As Scripting.Folder, SubFolder As Scripting.Folder
Dim FileItem As Scripting.File
Dim r As Long
  Set FSO = New Scripting.FileSystemObject
  Set SourceFolder = FSO.GetFolder(SourceFolderName)
  r = Range("A65536").End(xlUp).Row + 1
  For Each FileItem In SourceFolder.Files
  ' display file properties
  Cells(r, 1).Formula = FileItem.Path & FileItem.Name
  Cells(r, 2).Formula = FileItem.Size
  Cells(r, 3).Formula = FileItem.Type
  Cells(r, 4).Formula = FileItem.DateCreated
  Cells(r, 5).Formula = FileItem.DateLastAccessed
  Cells(r, 6).Formula = FileItem.DateLastModified
  Cells(r, 7).Formula = FileItem.Attributes
  Cells(r, 8).Formula = FileItem.ShortPath & FileItem.ShortName
  ' use file methods (not proper in this example)
' FileItem.Copy "C:\FolderName\Filename.txt", True
' FileItem.Move "C:\FolderName\Filename.txt"
' FileItem.Delete True
  r = r + 1 ' next row number
  Next FileItem
  If IncludeSubfolders Then
  For Each SubFolder In SourceFolder.SubFolders
  ListFilesInFolder SubFolder.Path, True
  Next SubFolder
  End If
  Columns("A:H").AutoFit
  Set FileItem = Nothing
  Set SourceFolder = Nothing
  Set FSO = Nothing
  ActiveWorkbook.Saved = True
End Sub

'***************************************************************

Using F4 and Shift F4 key for finding in Excel

It becomes annoying to have find dialogue box while searching in front of the view. The following trick shows that we can hide the find dialogue box and still search. 

1. Use the Find option from the Edit menu as normal, specifying what I want to search for and then looking for the first occurrence.

2. When the first occurrence is displayed, I press the Esc key (or click on Cancel). The Find dialog box disappears.

3. To find the next occurrence, I press Shift+F4.

This procedure works the same as clicking Find Next repeatedly, and it is just as fast, but it gets rid of the annoying Find dialog box.