About Us

TBD

Hi Offace,
This is great, definately food for thought - started experimenting and
anticipate it may take a while. Wanted to say THANKS! Assuming VBA doesn't
have a simple casting syntax, you're suggestions seem the best - perhaps only
- alternative.
For the record, this is what I'm trying to accomplish (without CType.)
There would be a symmetric Write function as well.

Thanks/Cheers!
P.S. This reply dialog "differs" from what I'm used to(?)

Code:

Public Type DayKey
  dDate As Date
  iRow As Integer
  iCol As Integer
End Type

Public Sub QD_Read(ByVal AbsRow As Integer, _
                   ByVal AbsCol As Integer, _
                   ByRef dDate As Date, _
                   ByRef datRow As Integer, _
                   ByRef datCol As Integer)
  Dim tKey As DayKey
  
  tKey = CType(WS.Cells(AbsRow, AbsCol).Text, DayKey)
  
  dDate = tKey.dDate
  datRow = tKey.iRow
  datCol = tKey.iCol
End Sub

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
=SUBSTITUTE(C4,"~?#","") will this work to remove multiple string	Raja Mahendiran S	Excel Worksheet Functions	6	May 12th 10 09:10 PM
Userform problem with "obj doesn't support this property or method"error message.	Chet	Excel Programming	0	August 12th 09 05:26 PM
combining or "flattening" rows	HWhite	Excel Worksheet Functions	6	July 3rd 09 06:40 PM
Converting "uppercase" string data to "lower case" in CSV file	[email protected]	Excel Discussion (Misc queries)	2	August 12th 08 08:36 PM
text string: "91E10" in csv file auto converts to: "9.10E+11"	[email protected]	Excel Discussion (Misc queries)	2	August 12th 08 03:13 PM

Menu

About Us