Sunday, March 27, 2016

10 Largest Holes Swallowing The Earth




Amazing People With Real Super Powers




Wednesday, February 24, 2016

Final Of PSL in Dubai.


https://photos.google.com/share/AF1QipOghrn1MVan3OaYNXycQ_sceQH7QGs1u8DVm8ejiGTNw7VHIUdr5SxZ5g8KEtIvFw/story/AF1QipMcIdBwLRNHh-AbH6IQzmuEBxLO73kJakgasxoHZc8KHSBmf5Aj5pbN8Z8Mk0HGQA?key=VmpBeUhkbW5jcE9jcVU3NExodS1XZXFNNS1HODZn

https://goo.gl/photos/eeD8tg12b8Bab7pf6

Pakistan Super League Official Anthem


Monday, February 01, 2016

Top 10 Amazing Places On Earth You Won't Believe Are Real


The Most Dangerous Selfies Ever Taken


10 Deadly Natural Disasters Caught on Video


The Most Beautiful Places in the World


The Top Ten Most Beautiful Roads in the World .


TopTen Most Beautiful Cities in The World 2016.


Top 10 Richest Royals in the World 2015


Top 10 Richest People in the World 2015/2016


Atif Aslam, Tajdar-e-Haram, Coke Studio


Hazrat Ali (A S) Home in Makka Mukarma, Saudi Arabia

Hazrat Halima Ka Ghar Taif

Monday, February 03, 2014

Compression utilities comparison


we are normally having discussion related to compression utilities. following is my finding for this topic, using compression utilities ( 7z, WinRar, Windows compression)


Thursday, January 09, 2014

Adding Dynamic Column to Excel

Adding Dynamic Column to Excel
Following function will add one column at  location D for all the sheets in opened excel document.

Sub AddColumnUPdateHeader()


For X = 1 To Worksheets.Count
 Sheets(X).Select
 Columns("D:D").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove


Next X

End Sub

Tuesday, January 07, 2014

Macro for Excel to get Count and Names of Sheets of excel documents

Following routing will update Cell B2 with count of total numbers of sheet and Update Column C with names of sheets.

Sub ReadNames()

Range("B2") = Worksheets.Count

For X = 1 To Worksheets.Count

Range("C" & X).Value = Worksheets(X).Name

Next X

End Sub