精华内容
下载资源
问答
  • Excel表格复制到Foxmail不显示边框

    千次阅读 2020-09-11 10:22:55
    复制粘贴Excel表格内容Foxmail 时,边框粗线经常出现某一边不显示问题: 在Excel 表格显示完好: 复制表格粘贴Foxmail 邮件时,出现了局部边框不显示问题。 解决方法: 将表格先复制-粘贴word文档, ...

    在复制粘贴Excel表格内容到Foxmail 时,边框粗线经常出现某一边不显示问题:

    在Excel 表格显示完好:

    复制表格粘贴到Foxmail 邮件时,出现了局部边框不显示问题。 

    解决方法: 

    • 将表格先复制-粘贴到word文档,
    • 再从word文档复制粘贴到Foxmail

    显示终于恢复正常,如上图。

    展开全文
  • 如何复制excel表格到outlook邮件

    千次阅读 2015-08-05 09:06:55
    Public Sub sendEmail(strSentTo As String, strCC As String, strSubject As String, strBody As String, rng1 As Range) 'strExecCmd = "Mailto:" & strSentTo & "&Subject=" & strSubject & "&body=

    博主承接各类外包,有意请点击查看博主技术栈

    Public Sub sendEmail(strSentTo As String, strCC As String, strSubject As String, strBody As String, rng1 As Range)
        
        'strExecCmd = "Mailto:" & strSentTo & "&Subject=" & strSubject & "&body=" & strBody '& "&cc=" & strCc
        'CreateObject("WScript.Shell").Run strExecCmd
        'Dim rng As Range
        Dim OutApp As Object
        Dim OutMail As Object
        
        With Application
            .EnableEvents = False
            .ScreenUpdating = False
        End With
        
        'Set rng = Nothing
        'Set rng = ActiveWorkbook.Worksheets(2).UsedRange
        
        Set OutApp = CreateObject("Outlook.Application")
        Set OutMail = OutApp.CreateItem(0)
        
        On Error Resume Next
        With OutMail
            .To = strSentTo
            .CC = strCC
            .BCC = ""
            .Subject = strSubject
            .HTMLBody = strBody & RangetoHTML(rng1)
            .Display   'or use .Display
        End With
        On Error GoTo 0
        
        With Application
            .EnableEvents = True
            .ScreenUpdating = True
        End With
        Set OutMail = Nothing
        Set OutApp = Nothing
    End Sub


    Function RangetoHTML(rng As Range)
    ' Changed by Ron de Bruin 28-Oct-2006
    ' Working in Office 2000-2010
        Dim fso As Object
        Dim ts As Object
        Dim TempFile As String
        Dim TempWB As Workbook
     
        TempFile = Environ$("temp") & "/" & Format(Now, "dd-mm-yy h-mm-ss") & ".htm"
     
        'Copy the range and create a new workbook to past the data in
        rng.SpecialCells(xlCellTypeVisible).Copy
        Set TempWB = Workbooks.Add(1)
        With TempWB.Sheets(1)
            .Cells(1).PasteSpecial Paste:=8
            .Cells(1).PasteSpecial xlPasteValues, , False, False
            .Cells(1).PasteSpecial xlPasteFormats, , False, False
            '.Cells(1).PasteSpecial Operation:=SkipBlanks
            .Cells(1).Select
            Application.CutCopyMode = False
            On Error Resume Next
            .DrawingObjects.Visible = True
            .DrawingObjects.Delete
            On Error GoTo 0
        End With
     
        'Publish the sheet to a htm file
        With TempWB.PublishObjects.Add( _
             SourceType:=xlSourceRange, _
             Filename:=TempFile, _
             Sheet:=TempWB.Sheets(1).Name, _
             Source:=TempWB.Sheets(1).UsedRange.Address, _
             HtmlType:=xlHtmlStatic)
            .Publish (True)
        End With
     
        'Read all data from the htm file into RangetoHTML
        Set fso = CreateObject("Scripting.FileSystemObject")
        Set ts = fso.GetFile(TempFile).OpenAsTextStream(1, -2)
        RangetoHTML = ts.ReadAll
        ts.Close
        RangetoHTML = Replace(RangetoHTML, "align=center x:publishsource=", _
                              "align=left x:publishsource=")
     
        'Close TempWB
        TempWB.Close savechanges:=False
     
        'Delete the htm file we used in this function
        Kill TempFile
     
        Set ts = Nothing
        Set fso = Nothing
        Set TempWB = Nothing
    End Function

    展开全文
  • #程序描述:实现从本地路径读取excel文件内容,并绘制HTML表格,将内容写入邮件正文区发送 #编写时间:2014.11.29-2014.12.4 #作者:刘琳泽 #解释环境:Windows 7家庭高级版 Python 2.7.8IDLE #引入excel...
    # -*- coding: utf-8 -*-
    

    #程序名称:自动化缺陷报告脚本
    #程序描述:实现从本地路径读取excel文件内容,并绘制HTML表格,将内容写入邮件正文区发送
    #编写时间:2014.11.29-2014.12.4
    #作者:刘琳泽
    #解释环境:Windows 7家庭高级版 Python 2.7.8IDLE


    #引入excel文档相关库
    import xlrd
    import os,time

    #引入邮件相关库
    import smtplib
    from email.mime.text import MIMEText
    from email.header import Header
    import base64

    #处理从excel中读取的float类型数据的类
    #目前集成两种处理:(1)float到int型的转换(2)float到str型的转换,后续有需要可以增加方法以集成其他类型的转换
    class judgeFloat:
        def floatToInt(self,variable):
            variable="%d"%variable
            return variable
        def floatToStr(self,variable):
            variable=xlrd.xldate_as_tuple(variable,0)
            variable=list(variable)
            if variable[1]<10:
                variable[1]='0'+str(variable[1])
                variable=str(variable[0])+str(variable[1])+str(variable[2])
            return variable

    #确定文档是否修改的函数:获取文档的修改时间与本地时间对比,不一致要求用户确认是否继续执行,一致则直接执行
    def openFile(filename,address):
        filetime=time.strftime("%Y/%m/%d",time.localtime(os.stat(address+filename).st_mtime))
        local=time.strftime("%Y/%m/%d",time.localtime())
        if filetime!=local:
            single=input("文档今天还没有修改过,请确认是否继续?确认请输入1后点击回车,否则输入2点击回车。")
            if single==1:
                pass
            elif single==2:
                exit()
            else:
                print '您的输入有误!脚本即将结束。'
                time.sleep(5)
                exit()
        else:
            pass

    #写邮件的函数
    def mailWrite(filename,address):
        header='<html><head><meta http-equiv="Content-Type" content="text/html; charset=utf-8" /></head>'
        th='<body text="#000000">committed缺陷详情:<table border="1" cellspacing="0" cellpadding="3" bordercolor="#000000" width="1800" align="left" ><tr bgcolor="#F79646" align="left" ><th>标识</th><th>摘要</th><th>状态</th><th>优先级</th><th>严重性</th><th>标记</th><th>所有者</th><th>创建时间</th><th>修改时间</th></tr>'
    #打开文件
    filepath=address+filename
    book=xlrd.open_workbook(filepath)
    sheet=book.sheet_by_index(0)
    #获取行列的数目,并以此为范围遍历获取单元数据
    nrows = sheet.nrows-1
    ncols = sheet.ncols
    body=''
    cellData=1
    for i in range(1,nrows+1):
        td=''
        for j in range(ncols):

    #读取单元格数据,赋给cellData变量供写入HTML表格中
            cellData=sheet.cell_value(i,j)
    #调用浮点型转换方法解决读取的日期内容为浮点型数据的问题

            if isinstance(cellData,float):
                if j==0 and i>0:
                    cellDataNew=judgeFloat()
                    cellData=cellDataNew.floatToInt(cellData)
                else:
                    cellDataNew=judgeFloat()
                    cellData=cellDataNew.floatToStr(cellData)
            else:
                pass
            tip='<td>'+cellData+'</td>'
    #并入tr标签
        td=td+tip
    tr='<tr>'+td+'</tr>'
    #为解决字符串拼接问题增设语句,tr从excel中读取出来是unicode编码,转换成UTF-8编码即可拼接
    tr=tr.encode('utf-8')
    #并入body标签
    body=body+tr
    tail='</table></body></html>'
    #将内容拼接成完整的HTML文档
    mail=header+th+body+tail
    return mail
    #发送邮件
    def mailSend(mail):
    #设置发件人
        sender = '***'
    #设置接收人
        receiver = '***@***.com'
    #设置邮件主题
        subject = '测试邮件,请忽略!'
    #设置发件服务器,即smtp服务器
        smtpserver = 'smtp.***.net'
    #设置登陆名称
        username = '***@***.net'
    #设置登陆密码
        password = '******'
    #实例化写邮件到正文区,邮件正文区需要以HTML文档形式写入
        msg = MIMEText(mail,'html','utf-8')
    #输入主题
        msg['Subject'] = subject
    #调用邮件发送方法,需配合导入邮件相关模块
        smtp = smtplib.SMTP()
    #设置连接发件服务器
        smtp.connect('smtp.***.net')
    #输入用户名,密码,登陆服务器
        smtp.login(username, password)
    #发送邮件
        smtp.sendmail(sender, receiver, msg.as_string())
    #退出登陆并关闭与发件服务器的连接
        smtp.quit()
    #入口函数,配置文件地址和文件名
    def main():
        filename='Sheet1.xlsx'
        address='d:/defectManage/'
        openFile(filename,address)
        mail=mailWrite(filename,address)
        mailSend(mail)

    #调用执行main函数
    if __name__=="__main__":
        main()

    展开全文
  • 刚才一个朋友问我这个事情,我拍脑袋想了一下,给他答复不可能,因为html是文本,而excel是二进制,两者没有...要解决html中的表格内容直接复制到excel,有个简单的办法,那就是在html表格的td标签加上vnd.ms-excel....

    刚才一个朋友问我这个事情,我拍脑袋想了一下,给他答复不可能,因为html是文本,而excel是二进制,两者没有关联关系,怎么能直接复制呢。于是就想到了写jxls模板,查询数据库导出这种方法。事后,不太确信自己的结论,所以问了下google大神,果然有简单的解决方案。

     

    要解决html中的表格内容直接复制到excel,有个简单的办法,那就是在html表格的td标签加上vnd.ms-excel.numberformat:@样式。

     

    <table border="1">
    	<tr><td style="vnd.ms-excel.numberformat:@">123456789012345678aa</td><td style="vnd.ms-excel.numberformat:@">wfwwwercssfsfsf</td></tr>
    	<tr><td style="vnd.ms-excel.numberformat:@">123456789012345678aa</td><td style="vnd.ms-excel.numberformat:@">wfwwwercssfsfsf</td></tr>
    	<tr><td style="vnd.ms-excel.numberformat:@">123456789012345678aa</td><td style="vnd.ms-excel.numberformat:@">wfwwwercssfsfsf</td></tr>
    	<tr><td style="vnd.ms-excel.numberformat:@">123456789012345678aa</td><td style="vnd.ms-excel.numberformat:@">wfwwwercssfsfsf</td></tr>
    </table>

     

    这样的表格内容,可以被直接复制到excel当中,每个td中的内容,直接填充到excel的cell单元格中。

     

    刚才在linux系统试了一下,html中的表格不用加样式,也能直接將内容复制到open office中的电子表格中。

     

    windows里试了下,不用加这种样式,html表格内容可以直接复制到wps建的ms excel里。

     

    原版的excel表现如何,就不得而知了,因为没有装,呵呵。

     

     

    展开全文
  • 如何实现在网页中在线编辑EXCEL表格,然后保存服务器中一般通过邮件附送文件的方享excel表格,想把一个excel表享给更多人时,只要把表格嵌入在网页里将是一个再好不过的方法。我们在后台对excle表格里的数据进行...
  • 1.直接复制到word,然后根据页面视图、阅读视图、web版式视图,对表格进行缩短
  • 好文网为大家准备了关于网页上表格复制到ECEL只能选HTML格式范文,好文网里面收集了五十多篇关于好网页上表格复制到ECEL只能选HTML格式好文,希望可以帮助大家。更多关于网页上表格复制到ECEL只能选HTML格式内容请关注...
  • 关键词:Python, 邮件扫描, yaml配置文件,邮件附件编解码,Excel自动处理一 、前言 作为一只二级市场资管狗,平时少不了向各相关方汇报产品数据,不论领导、风控部门同事、市场人员或者客户,经常会要求我们按照...
  • 如何将EXCEL复制的内容完整地粘贴到邮件的正文
  • I am using win32com.client in Python to send an email.However I want the body of the email to be a table (HTML- formatted table), I can do it in an Excel first and then copy and paste (but how?...
  • 最近工作中遇到同事经常要发送销售日报之类的,邮件内容极为相似, 发送内容有:邮件主题,报表,报表附件,发送抄送不同人员。 本分享实现内容,可以填入不同发送服务器,不同工作表、附件、发送给对应的接收人,...
  • 通过读取Outlook保存的msg类型邮件文件,解析邮件内容中的表格,并导出成Excel 工具介绍 outlook-message-parser : 一个Outlook邮件(.msg文件)解析工具 myexcel : 一个集导入、导出、加密Excel等多项功能的工具包 ...
  • 163邮箱邮件excel表格右键另存为,格式为什么不对?以下文字资料是由(历史新知网www.lishixinzhi.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!163邮箱邮件excel表格右键另存为,格式为什么不对?这...
  • excel表格输出word中的一种方法

    千次阅读 2012-05-07 12:49:32
    目前的应用场景,经常需要把excel里头的几张财务报表,作为附表拷贝word报告中,每次复制粘贴后,格式都变了,用“仅保留文本”的粘贴方式也不奏效,文字大小、数字对齐都不合要求,需要手动调一遍,费时且易出错...
  • Excel表格内容自动填充word中的指定位置使用粘贴链接。在Excel中复制需要进入Word文档中的数据内容,然后在Word文档中,点击选择性粘贴,然后点选粘贴为链接。如何将EXCEL的文字复制到WORD的表格?打开一个需要复制...
  • 来源:宜信技术学院 作者:王春强本文主要解决导出Excel中图表,截图到邮件中,发送邮件。一、解决方案方案一:使用类似Excel中图表的第三方前端图表例如Echart等,填充数据Echart,然后保存为图片,发送 邮件。问题是...
  • 读取固定的一个excel文件的内容,以html的形式将excel文件的内容展示在邮件正文中,显示为表格的形式,同时在邮件正文中拼接其他的文件内容,另将读取的excel文件作为邮件附件发送。 import smtplib from email.mime...
  • 在日常工作中,经常会遇到需要群发邮件的情况,但很多时候我们有的只是一张有邮箱地址的excel表格,很多人这时不知道下一步该怎么做,今天一米软件就来教教大家怎么给excel表格中的邮箱群发邮件。 一、数据准备主要...
  • 如何向excel数据自动填入WORD文档中相应位置并打印这需要word文档中使用邮件合功批量打印EXCEL数据,具法如下:1、打开正在使用的word文档(这里以空文档作为示例,实际运用时EXCEL文档插入内容和位置以实际需要为准...
  • 本节书摘来异步社区《Excel高手捷径:一招鲜,吃遍天》一书中的第1章,第27节,作者: 聂春霞 责编: 王...Excel高手捷径:一招鲜,吃遍天在Excel编辑的表格复制到邮件内容中,就多了“窗体顶端”、“窗体底端”...
  • 微信内置浏览器导出Excel表格功能

    千次阅读 2018-07-30 18:04:42
    最近做项目的时候遇到了这样一个问题,微信内置的浏览器把下载这个功能屏蔽了。唉,,,折腾了一天,从网上各种找资料,但是给的解决方案都...此代码包括发送邮件和生成表格。 import java.io.ByteArrayInpu...
  • Excel 表格图片压缩方法

    万次阅读 2008-06-04 20:34:00
    我们在工作,学习当中少不了用Excel 来制作各式各样的表格,其中有很多使用技巧,来提高我们的工作效率。下面介绍在EXCEL中压缩图片的方法: 一、如果你在EXCEL工作表中插入比较大的图片,保存为文件后,大小有15-20...
  • 读取固定的一个excel文件的内容,以html的形式将excel文件的内容展示在邮件正文中,显示为表格的形式,同时在邮件正文中拼接其他的文件内容,另将读取的excel文件作为邮件附件发送。 import smtplib from email.mime...
  • 主要咨询邮件中body后面的内容,同时需要保证格式一致,请各位大神帮忙解决,谢谢
  • Excel自动批量发邮件

    千次阅读 2019-01-26 15:30:17
    如何让Excel自动发送邮件?比如说,使用outlook批量发送工资条,并且把指定单元格区域作为表格粘贴在邮件正文内……嗯,还得增加一个《关于企业调整职工工资的通知.docx》的附件。发送后的邮件像下图酱紫的。2.首先...
  • 发送邮件的Python脚本网上有很多,就不做过多描述: 1、通过本地Excel获取原始数据: wb = load_workbook(fileName,data_only=True) ws = wb.get_sheet_by_name('Crash') for rown in xrange(3,7): for coln in ...
  • “xxxx大神啊,你Excel用的这么溜,有没有什么窍门呢?” “大神不敢当的,窍门就是多看优秀的案例、多实践。” “经常看各种Excel小技巧啊,每天上班也在用。刚开始进步很快,现在天天就用那些。” “哈,够用就好...
  • 今天遇到了一个奇怪的问题,就是在word表格中的数据复制到excel复制到excel的数据一直无法用excel的公式计算,求和一直是0,然后matlab用xlsread也是无法读取,看到网上有很多解决的办法,试了都没用 比如: 或者...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 6,649
精华内容 2,659
关键字:

excel表格复制到邮件