Canot change format of a cell

Gregfox

Board Regular
Joined
Apr 12, 2011
Messages
116
Scratching my head on this;
I copied a date from the web 'Jul 3 2018' and when I try to format(excel 2007 PC) it in VBA to dd/mm/yyyy but it doesn't change.
I even tried paste special:
Code:
    Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
        xlNone, SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
But it still stays as 'Jul 3 2018
?
 

Rick Rothstein

MrExcel MVP
Joined
Apr 18, 2011
Messages
35,498
Office Version
2010
Platform
Windows
The problem is that "Jul 3 2018" is not date in Excel (nor VB). You must first convert it to a real date and then format the cell...

Selection = CDate(Selection)
selection.NumberFormat = "dd/mm/yyyy"
 

Forum statistics

Threads
1,081,545
Messages
5,359,444
Members
400,528
Latest member
Ratish52

Some videos you may like

This Week's Hot Topics

  • VBA (Userform)
    Hi All, I just would like to know why my code isn't working. Here is my VBA code: [CODE=vba]Private Sub OKButton_Click() Dim i As Integer...
  • List box that changes fill color
    Hello, I have gone through so many pages trying to figure this out. I have a 2020 calendar that depending on the day needs to have a certain...
  • Remove duplicates and retain one. Cross-linked cases
    Hi all I ran out of google keywords to use and still couldn't find a reference how to achieve the results of a single count. It would be great if...
  • VBA Copy and Paste With Duplicates
    Hello All, I'm in need of some input. My VBA skills are sub-par at best. I've assembled this code from basic research and it works but is...
  • Macro
    is it possible for a macro to run if the active cell value is different to the value above it
  • IF DATE and TIME
    I currently use this to check if date has passed but i also need to set a time on it too. Is it possible? [CODE=vba]=IF(B:B>TODAY(),"Not...
Top