<html>
<head>
<base href="https://bugs.documentfoundation.org/">
</head>
<body><table border="1" cellspacing="0" cellpadding="8">
<tr>
<th>Bug ID</th>
<td><a class="bz_bug_link
bz_status_UNCONFIRMED "
title="UNCONFIRMED - FILEOPEN XLSX Basic code with SpecialCells(xlCellTypeConstants, 1) range method is ignored"
href="https://bugs.documentfoundation.org/show_bug.cgi?id=118247">118247</a>
</td>
</tr>
<tr>
<th>Summary</th>
<td>FILEOPEN XLSX Basic code with SpecialCells(xlCellTypeConstants, 1) range method is ignored
</td>
</tr>
<tr>
<th>Product</th>
<td>LibreOffice
</td>
</tr>
<tr>
<th>Version</th>
<td>6.2.0.0.alpha0+ Master
</td>
</tr>
<tr>
<th>Hardware</th>
<td>All
</td>
</tr>
<tr>
<th>OS</th>
<td>All
</td>
</tr>
<tr>
<th>Status</th>
<td>UNCONFIRMED
</td>
</tr>
<tr>
<th>Severity</th>
<td>normal
</td>
</tr>
<tr>
<th>Priority</th>
<td>medium
</td>
</tr>
<tr>
<th>Component</th>
<td>BASIC
</td>
</tr>
<tr>
<th>Assignee</th>
<td>libreoffice-bugs@lists.freedesktop.org
</td>
</tr>
<tr>
<th>Reporter</th>
<td>kelemeng@ubuntu.com
</td>
</tr></table>
<p>
<div>
<pre>Created <span class=""><a href="http://bugs.documentfoundation.org/attachment.cgi?id=142932" name="attach_142932" title="Example file from Excel">attachment 142932</a> <a href="http://bugs.documentfoundation.org/attachment.cgi?id=142932&action=edit" title="Example file from Excel">[details]</a></span>
Example file from Excel
If we use XlSpecialCells range method in visual basic code created by Microsoft
Excel 2013/2016, and open with LibreOffice Calc and run the macro, the
“SpecialCells(xlCellTypeConstants, 1)” method is ignored.
Steps to reproduce:
1. Create a new spreadsheet with Microsoft Excel 2016/2013
2. Fill a range (for example A1:V30) with numbers and letters
3. Open the Visual Basic window
3. Add a new Module to your VBAProject
4. Copy this VBA code to your module:
Sub kijeloles_adatok()
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
Selection.SpecialCells(xlCellTypeConstants, 1).Select
With Selection.Interior
.Pattern = xlSolid
.Color = 5287936
End With
ActiveSheet.Range("A1").Select
End Sub
5. Save the file as *.xlsm
6. Open the file in LibreOffice Calc and run the macro.
Actual results:
The macro is run without an error, but the
Selection.SpecialCells(xlCellTypeConstants, 1) method was ignored. Instead of
filling the numbers with color the macro fills all the range with color.
Expected results:
The SpecialCells(xlCellTypeConstants, 1) method should work correctly.
Version: 6.0.0.0.beta1+
Build ID: 29228e83df009cf76ac819ed024527be1092f065
CPU threads: 4; OS: Windows 6.1; UI render: default;
TinderBox: Win-x86@42, Branch:libreoffice-6-0, Time: 2017-12-04_23:15:34
Locale: hu-HU (hu_HU); Calc: group threaded</pre>
</div>
</p>
<hr>
<span>You are receiving this mail because:</span>
<ul>
<li>You are the assignee for the bug.</li>
</ul>
</body>
</html>