hai167-CSDN博客

转载 VBA提取html的table数据

Sub test()Dim oDom As Object: Set oDom = CreateObject("htmlFile")Dim x As Long, y As LongDim oRow As Object, oCell As ObjectDim datay = 1: x = 1With CreateObject("msxml2.xmlhttp")'http://www.bundesbank.de/Navigation/EN/Statistics/Time_series_data

2020-09-02 11:40:21 1638

原创历遍文件夹批量修改文件名

Sub yyy() Dim fso As New FileSystemObject Dim fd As Folder Dim sfd As Folder Dim fl As File

2020-08-21 09:17:44 124

原创 VBA 插入图片以及对图片进行裁切及位置移动

VBA 插入图片以及对图片进行裁切及位置移动 Set shp = Sheet1.Shapes.AddPicture("路径", msoFalse, msoCTrue, 0, 0, -1, -1) With shp .PictureFormat.CropTop = mTop '下移裁剪 .PictureFormat.CropLeft = mLeft '右移裁剪 .PictureFormat.Crop

2020-08-14 14:22:05 5053

原创 vba 读取图片尺寸

vba 获取图片尺寸Function Get_ImgPixel§Dim WshShell As ObjectDim dpi'1 Inch = 2540 Himetric Const key = "HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics\AppliedDPI"Set WshShell = CreateObject("Wscript.Shell")dpi = WshShell.RegRead(key)Him

2020-08-14 14:14:36 2518

Pyv8 32位 PyV8-1.0-preview-r443.win32

Pyv8 32位安装，解压后将文件放到python的目录下面安装。

2017-11-29

供商管理的七大指标，有效管理供应商

六西格玛管理中有句名言：你设立什么样的指标，就得到什么。换言之，你想得到什么，那就设立相应的指标。建立合理的指标体系，来引导个人和组织的行为，达到预期的目标，是目标管理的基本出发点，贯穿现代管理的每个环节，也适用于供应商管理。供应商是公司的延伸。公司的成功离不开本身的努力，也取决于供应商的表现。合理的供应商管理指标，不但利于激励供应商达到一定的目标，也可统一供应商与公司的目标。那么，供应商绩效指标如何设置？这里结合笔者熟悉的美国高科技生产企业进行阐述。总体上，供应商管理指标体系包括七个方面：质量（Quality）、成本（Cost）、交货（Delivery）、服务（Service）、技术（Technology）、资产（Asset）、员工与流程（People and Process），合称QCDSTAP，即各英文单词的第一个字母。前三个指标各行各业通用，相对易于统计，属硬性指标，是供应商管理绩效的直接表现；后三个指标相对难于量化，是软性指标，但却是保证前三个指标的根本。服务指标介于中间，是供应商增加价值的重要表现。前三个指标广为接受并应用；对其余指标的认识、理解则参差不齐，对其执行则能体现管理供应商的水平。

2010-05-18

例子

两个表的附件

2007-09-02

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人