Bug 35593

Summary: macro themecolor - tintandshade - patterntintandshade are all problems.
Product: LibreOffice Reporter: jkonecny
Component: BASICAssignee: Not Assigned <libreoffice-bugs>
Status: NEW ---    
Severity: enhancement CC: testing1237a-c
Priority: medium    
Version: 3.3.0 release   
Hardware: Other   
OS: All   
See Also: https://bugs.documentfoundation.org/show_bug.cgi?id=122681
Whiteboard:
Crash report or crash signature: Regression By:
Bug Depends on:    
Bug Blocks: 108908    
Attachments: tintandshade demo file

Description jkonecny 2011-03-23 08:14:30 UTC 
The macro below which which came over from an unknown version of excel does not run.  themecolor - tintandshade - patterntintandshade are all problems.

Rem Attribute VBA_ModuleType=VBAModule
Option VBASupport 1
Sub WhiteReset()
'
' WhiteReset Macro
'
' Keyboard Shortcut: Ctrl+w
'
    ActiveCell.Range("A1:B1").Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .PatternTintAndShade = 0
    End With
    With Selection.Font
        .ColorIndex = xlAutomatic
        .TintAndShade = 0
    End With
End Sub
Comment 1 Noel Power 2013-02-05 14:31:48 UTC 
marking this as an enhancement, I don't currently have plans to look at this so putting back to default
Comment 2 johnks 2020-07-04 04:51:58 UTC 
Created attachment 162626 [details]
tintandshade demo file

BASIC runtime error.
'423'
TintAndShade



attaching this file containing tintandshade. removing this from the macro makes the macro work just fine