Registriert seit: 11.04.2014
Version(en): Office 2007
Auch Hallo,
(05.09.2019, 13:25)SteBen schrieb: Hab's auch noch so versucht, aber so tut sich leider nichts...
Code:
' CREATE EMAIL OBJECT.
Debug.Print RangetoHTML(Range("A1", Range("A1").End(xlDown) & (Range("A1", Range("A1").End(xlToRight).Offset(1, 0)))))
da wird nichts im
Direktfenster (STRG + G) angezeigt?
Gruß Stefan
Win 10 / Office 2016
Registriert seit: 12.06.2019
Version(en): Microsoft Office Professionak Plus 2016
Hi Stefan,
wenn ich 'create email object in Deine Vartiante ändere, steht folgendes im Direktfenster.
Code:
<html xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:x="urn:schemas-microsoft-com:office:excel"
xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=windows-1252">
<meta name=ProgId content=Excel.Sheet>
<meta name=Generator content="Microsoft Excel 15">
<link rel=File-List href="11-09-19%2011-46-37-Dateien/filelist.xml">
<style id="Tabelle1_27516_Styles">
<!--table
{mso-displayed-decimal-separator:"\,";
mso-displayed-thousand-separator:"\.";}
.xl1527516
{padding-top:1px;
padding-right:1px;
padding-left:1px;
mso-ignore:padding;
color:black;
font-size:11.0pt;
font-weight:400;
font-style:normal;
text-decoration:none;
font-family:Calibri, sans-serif;
mso-font-charset:1;
mso-number-format:General;
text-align:general;
vertical-align:bottom;
mso-background-source:auto;
mso-pattern:auto;
white-space:nowrap;}
.xl6327516
{padding-top:1px;
padding-right:1px;
padding-left:1px;
mso-ignore:padding;
color:black;
font-size:10.0pt;
font-weight:400;
font-style:normal;
text-decoration:none;
font-family:Calibri, sans-serif;
mso-font-charset:0;
mso-number-format:General;
text-align:center;
vertical-align:middle;
border:.5pt solid black;
background:white;
mso-pattern:black none;
white-space:normal;}
-->
</style>
</head>
<body>
<!--[if !excel]> <![endif]-->
<!--Die folgenden Informationen wurden durch den Web-Formular-Assistenten von
Microsoft Excel erstellt.-->
<!--Falls das gleiche Element mit Excel veröffentlicht wird, werden alle
Informationen zwischen den DIV-Etiketten ersetzt.-->
<!----------------------------->
<!--START OF OUTPUT FROM EXCEL PUBLISH AS WEB PAGE WIZARD -->
<!----------------------------->
<div id="Tabelle1_27516" align=left x:publishsource="Excel">
<table border=0 cellpadding=0 cellspacing=0 width=150 style='border-collapse:
collapse;table-layout:fixed;width:113pt'>
<col width=150 style='mso-width-source:userset;mso-width-alt:5485;width:113pt'>
<tr height=20 style='height:15.0pt'>
<td height=20 class=xl6327516 width=150 style='height:15.0pt;width:113pt'>S055051815</td>
</tr>
<![if supportMisalignedColumns]>
<tr height=0 style='display:none'>
<td width=150 style='width:113pt'></td>
</tr>
<![endif]>
</table>
</div>
<!----------------------------->
<!--END OF OUTPUT FROM EXCEL PUBLISH AS WEB PAGE WIZARD-->
<!----------------------------->
</body>
</html>
Das sagt mir leider absolut gar nichts....
Registriert seit: 11.04.2014
Version(en): Office 2007
Hallo,
ich habe keine Variante gepostet und das ist HTML-Code.
Gruß Stefan
Win 10 / Office 2016
Registriert seit: 17.04.2019
Version(en): M$ 365 AfE v2009 / Office2013
@SteBen:
Schlage vor, nicht nur Probieren, sondern auch mal nachlesen ;)
gruß
Marco
