I've released 0.97. Again, thank you for your report.
0.97 release
Version 0.97
Take your time. I've already fixed my local instance.
Thank you for your report. Yes, you are right. I should fix the code as you suggested first. hAlignment = .HorizontalAlignment If hAlignment = xlGeneral And (IsNumeric(cell) Or IsDate(cell)) Then hAlignment = xlRight End If My first commit was; + ' handle Excel special "General" horizontal alignment + If .HorizontalAlignment = xlGeneral And (IsNumeric(cell) Or IsDate(cell)) Then + .HorizontalAlignment = xlRight + End If + This fix had a problem. It modified the cell. When I fixed the bug, I could...
I've installed the latest version, and it doesn't work. Dim hAlignment As Variant If hAlignment = xlGeneral And (IsNumeric(cell) Or IsDate(cell)) Then hAlignment = xlRight Else hAlignment = .HorizontalAlignment End If cellValue = formatCell(cellValue, x, y, hAlignment, .VerticalAlignment, .indentLevel, fcolor, .DisplayFormat.Interior.color) "If hAlignment ..." never evaluates to true. You should check .HorizontalAlignment instead.
I've installed the latest version, and it doesn't work. Dim hAlignment As Variant If hAlignment = xlGeneral And (IsNumeric(cell) Or IsDate(cell)) Then hAlignment = xlRight Else hAlignment = .HorizontalAlignment End If cellValue = formatCell(cellValue, x, y, hAlignment, .VerticalAlignment, .indentLevel, fcolor, .DisplayFormat.Interior.color) " If hAlignment" never evaluates to true. You should check .HorizontalAlignment instead.
返信ありがとうございます。 ファイルのパスが /Library/Application Support/Adobe/MACPDFM/DC/SaveAsAdobePDF.xlam にありましたので、おそらく純正のものではないかと思われます。 "DC"となっていることから、Adobe Acrobat DC または Adobe Acrobat Reader DC に関係するものかもしれません。 ネット上で調べてみましたが、有益な情報は得られませんでした。
Clipboard does not work when Saveasadobepdf addin is valid
報告ありがとうございます。このような情報は他のユーザにとても有用です。 日本語のreportも歓迎です。ただ本件に関しては、多言語の方ともshareしたいので、勝手ながらsubjectを英語にさせていただきます。 (Subjectだけで、対処法も理解いただけると思います。) 私の環境もAcrobatはinstallされていますがVersionが古いためか、私の環境では現れません。Adobeの純正のaddinなのでしょうか?
Saveasadobepdfアドインが有効だとクリップボードにコピーされない
ActiveXエラーで実行できない
PowerPoint版も更新して、先ほどversion 0.96 として releaseしました。 報告ありがとうございました。 何か要望があればticketをopenしてください。可能な範囲で対応します。 本ticketはcloseさせていただきます。
0.96 release
0.96 release
ありがとうございます! toCSV, toTSVとも問題なくコピーできました!
失礼しました。 CSV/TSV modeを加えたことも忘れていました。 添付で確認いただけますでしょうか? 何度も申し訳ございません。
fix xls2csv_mainLoop not to use VBScript.RegExp for MacOS
ありがとうございます! Textile, HTML, Asciidoc, Markdownいずれも問題なく作成できました! 感謝致します! CSVとTSVのみ、以下のエラーが発生していました。
MacOSではRegular Expressonを使用しないようにしてみました。 添付で確認いただけますでしょうか?
mark ByVal or ByRef on each argument whose value is changed in the function
revert non VBScript.RegExp code for MacOS
そうだったのですね。 ご確認いただきありがとうございました。 当方、Redmineも利用しているため、以前より大変重宝させていただいていました。 WindowsにはRelaxToolsがありますが、macOS版は無く、こちらのアドインに助けられております。 開発がスムーズに進まれるよう応援しています!
確認ありがとうございます。 最初のErrorはRegular Expressionのlibraryだったとのこと。 検索したところ、Mac版では使えないことが分かりました。 https://answers.microsoft.com/en-us/msoffice/forum/all/visual-basic-regular-expression/0ae70106-8ae3-4d94-8eb8-122654e97517?auth=1 こちらは厄介です。 0.94の修正はWindowsでSkypeなどと同時に使うとclipboardがblockされてしまう問題の対応なので、MacOSには関係ないと思います。 0.95はMarkdown, AsciiDocへの対応です。Textile (Redmine) の表に比べ制約が多いので、結局HTMLの表を埋め込んでいます。 もう少し考えてみます。 とりあえずMacOSでは0.93 がdownloadされるよう設定を修正しました。
ありがとうございます! ダウンロードして再設定してみましたが、最初のエラーと同様でした。 デバッガのスクリーンショットを添付します。
失礼しました。 このticketに .xlam fileを添付します。
ありがとうございます! すみません、ダウンロード後「ツール > Excelアドイン」から読み込もうとしたのですが、グレーアウトしていて選択できませんでした。 拡張子が「xlsm」になっているのが原因でしょうか? 導入方法をご教示いただけると幸いです。
office 365 soloから名称変更されていたのですね、申し訳ありません。 いえいえ office 365はWeb版の名称と思っていたのですが、調べて office 365 が Windows 365に代わっていることを知りました。 勉強になりました。 いただいた情報で原因が推測できました。 https://sourceforge.net/p/office2textile/code/HEAD/tree/trunk/xls2textile.xlsm で試していただけますでしょうか?
clipboard handling uses the DataObject.PutInClipboard on Mac
do not modify files when a numeric or date cell is with xlGeneral horizontal alignment.
ちなみに、Ver. 0.94を試してみたところ「xls2textile」「xls2html」どちらも「実行時エラー '53': ファイルが見つかりません: User32」というエラーでした。参考まで。
macosのoffice365 の Excelとのことですが、Microsoft 365 Personal のWeb版ではない Excelでよろしいでしょうか? (Web版ではVBAを使用している本マクロは使用できません。) はい、Microsoft 365 Personalのインストール版ですね。 office 365 soloから名称変更されていたのですね、申し訳ありません。 Ver. 0.91をさきほどインストールして設定したところ、こちらは問題なく動作しました。
Reportありがとうございます。 まず確認させてください。 macosのoffice365 の Excelとのことですが、Microsoft 365 Personal のWeb版ではない Excelでよろしいでしょうか? (Web版ではVBAを使用している本マクロは使用できません。) https://www.microsoft.com/ja-jp/microsoft-365/buy/compare-microsoft-365-products-for-mac 現在すぐに使えるMacOSの環境がなく0.94以降はMacOSでの私自身では動作確認ができていません。 もし可能でしたら0.91で確認していただけますでしょうか? 確実にOffice 2016 for Macで動作確認しています。 確認結果次第で、MacOSの環境の立ち上げも検討したいと考えています。
ActiveXエラーで実行できない
xls2textile
ppt2textile
xls2textile
xls2textile
xls2textile
ppt2textile
xls2textile
Home
Home
update date
0.95 release candidate.
minor fix for ppt2textile.
define const perfTest
implement CSV/TSV output support.
escape '|' in Markdown mode.
delete trimStr(), needEscapeTT(), and needEscapeADoc().
make use of VBScript.RegExp object
update customIU files
add customIU files
ppt2textile support markdown lists.
make use of cellValue() with Markdown.
implement html41color() function for AsciiDoc text color.
reorder function definitions.
define lineBreak(), formatAttrMd(), and fontAttrStrMd().
make trimStr() compatible with ppt2textile.
rename noSpace to trailingSpace.
lspace and rspace instead of llen and rlen to support mixed white spaces for ppt2textile.
merge ppt2textile.vba. Still debugging.
update status bar by calling DoEvents.
refactoring: reorder functions
fix cell color for AsciiDoc
escape '|'
refactoring: formatCell() and formatAttr()
implement needEscapeADoc()
make global variable format and quick.
refactoring: define Enum font_e
AsciiDoc: add support of line-break, improve alignADoc().
refactoring: formatText()
refactoring: trimStr() part 2
refactoring: trimStr() part 1
remove safe mode
refactoring: define fontAttrTT(), halignHTML(), and valignHTML().
the first implementation of AsciiDoc support.
minimum implementation of xls2GFM() is done.
add xls2GFM().
rename cellText() to partiallyFormatCell().
define isUpperLeftCell() function
pass fmt as Fmt_e
define Enum Fmt_e
xls2textile
0.94 release
2019/12/28: Version 0.94
xls2textile
number alignment
I've release 0.93 including the fix for this ticket. Here is my fix [r17]. @@ -210,6 +211,11 @@ fcolor = .DisplayFormat.Font.color End If + ' handle Excel special "General" horizontal alignment + If .HorizontalAlignment = xlGeneral And (IsNumeric(cell) Or IsDate(cell)) Then + .HorizontalAlignment = xlRight + End If + If html Then cellValue = formatCellHTML(cellValue, x, y, .HorizontalAlignment, .VerticalAlignment, .indentLevel, fcolor, .DisplayFormat.Interior.color) Else
0.93 release
suppress cell attributes on empty cells
xls2textile: handle Excel special "General" horizontal alignment