Vb macro coding for transpose - complete coding?

[Dharani Suresh]

I need VB macro coding for transpose of the columns into rows. For every particular values in the columns it has to be converted into row... please give me the complete coding.. please do help me.. I need it very urgently... and also I have a word file with this for easy understanding with the output which I did manually. (since I was not able to attach the excel file with this)
For example:
The values are like this...
season
1969
TT
101.161
WATERSD
1
1969194.15311969293.15811969399.22311969493.95711969592.85911969695.99311969799.89611969898.7960.979751969992.4910.87287519691095.0910.83154545519691197.4570.92555555619691294.023119691332.15711970188.77911970289.60411970399.10811970492.42911970590.64311970698.6411970798.33111970897.44611970997.731119701094.025119701188.725119701289.228119701338.61411971197.37211971288.45711971390.26511971499.62111971591.52811971699.25211971793.55211971894.4530.8571971995.7530.51519711096.0520.519219711193.5490.68455555619711288.9050.97277777819711344.0740.88641972199.61911972292.70811972393.50311972492.60511972597.54611972692.6090.99211972794.1270.8441666671972892.2880.3941428571972997.8890.3587519721096.4230.98742857119721188.861119721291.608119721342.1911973196.46311973296.78911973395.42111973494.02111973588.09611973697.73711973798.7370.9471111111973891.2070.76551973995.0820.47955555619731094.3610.47088888919731190.2620.63455555619731291.2440.731419731337.1690.43175
OUTPUT:
I need output to be in the following manner:
1969111111110.979750.8728750.8315450.9255555561119701111111111111-197111111110.8570.5150.51920.6845560.9727777780.8864-1972111110.99210.8441670.3941430.358750.987429111-19731111110.9471110.76550.4795560.4708890.6345560.73140.43175-

 

[Sifou]

If you are copying the cells you are planning to transpose you will need something similar to the following in your VBA Macro code:

Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True

I hope this helps.

Sifou