On 02/09/2013 06:58 PM, Andrew Douglas Pitonyak wrote:
On 02/08/2013 05:15 PM, Joel Madero wrote:
Hi All,
I have a macro setup that can easily do the following:
pasteValue = mid(currentCellValue,1,4)
What is the format of "currentCellValue"? You grab the first four
characters in your example above? Your code is dependent on how it is
formatted.
a string is stored to pasteValue which I then can manipulate how I want.
What I want to do is make it actually more like this:
pasteValue =
date(value(mid(currentCellValue,1,4),value(mid(currentCellValue,5,2),value(mid(currentCellValue,8,2))
This won't work, there are so many things wrong with this, I won't
even try to deal with what you did wrong. Instead, I will guess what
you meant to do.
Curious why this works so well when in a cell....works exactly how I
want it to. So, it must be possible to work in a macro as well.
I am guessing that you are using something like a four digit year, a
two digit month, and then a two digit day. Is this correct? If so,
then you can CDateFromIso(currentCellValue), and this will give you a
date object directly and do all the work for you. This is the easiest
solution I think.
currentCellValue is a string that is ##.##.####, again this is a string
If you really want to do the hard work and rip values out, you
probably want to use
DateSerial(year, month, day)
In your case, it is probably:
DateSerial(mid(currentCellValue,1,4), mid(currentCellValue,5,2),
mid(currentCellValue,7,2))
Your strings will be automatically converted to numbers, so you don't
need to do it in your macro.
It needs to be done in macro, there is a big loop that it has to go through.
Disclaimer: This will return a number, which will not cause the cell
to be formatted as a date; you must set the formatting to be a date.
This isn't a problem.
I'll try with what you've provided.
Thanks,
Joel
--
For unsubscribe instructions e-mail to: [email protected]
Problems? http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/global/users/
All messages sent to this list will be publicly archived and cannot be deleted
