08 2017 档案
摘要：今天在使用PRD时，我先导入表A,然后觉得表A的名字不好，就把导入的表A重命名为表A_TMP,接着保存资料库就卡住了“未响应”（一般不会出现这种问题）接着我直接使用任务管理器强制停止了，第二次打开资料库时，检出表A_TMP时报错如下：此时，删除表A_TMP也不行，修改也不行，最终解决方案为：多个人同时操作，一个人检出另外一个人检出就报这个错，或者之前有操作出错，导致rpd自动退出，再登陆进来，也可...
阅读全文
摘要：在使用BIEE的过程中，通常会有需要根据下拉菜单所选内容进行数据展示，如下图所示：设置参数进入数据模型编辑界面→参数新增参数，P_DATADATE为示例参数参数赋值同时点击“值列表”，出现下图：为变量赋值查询引用参数在查询的SQL中，引用方式为：字段 IN (：变量)
阅读全文
摘要：环境准备 环境准备 JDK下载地址：直接去百度软件中心下载即可 BIPublisher下载地址：http://pan.baidu.com/s/1bpk03Jh 本例子中以win7 32位操作系统为例 1.安装已经下载好的2款软件 2.配置环境变量 右击计算机→属性→高级系统设置→系统属性→高级→环境
阅读全文
摘要：今天使用BIEE时意外的发现个问题，BIEE在展示结果时候，是先进行排序，然后再展示。具体测试案例如下：首先，存在如下数据：在BIEE展示效果如下：目前是根据O1,02,03,04,05,06,07进行排序的，但是这样显示感觉不好看，那么我从第四位开始截取以后显示如下：这个时候我们可以明显看出，他的显示顺序已经乱了...通过这个就可以看出BIEE的解析顺序
阅读全文
摘要：问题描述使用BIEE数据透视表时，使用了UNION进行数据组合，但是在浏览结果时意外出错了，报错如下截图：问题分析 原因暂时未知问题解决目前使用UNION进行聚合，只需要将UNION修改为UNION ALL即可解决问题
阅读全文
摘要：在Excle中，需要填充单元格，直接下拉，然后即可填充，但是使用VBA代码又该如何实现这个呢？代码区域Public Sub 快速填充() Dim myRange As range Cells.Clear '清除所有表格数据 Set myRange = range("A1:A12") With myRange.Cells(1) .Value = "1月" '设定...
阅读全文
摘要：单元格内设置了有效性，通过VBA怎么去复制呢？代码如下：Public Sub 复制单元格批注() Dim range1 As range Dim range2 As range '清除G列 Columns("G:G").Clear Set range1 = range("A1:A2") '指定要复制的单元格区域 Set range2 = range("D1") '指定要复制的...
阅读全文
摘要：只复制单元格的批注该怎么操作呢？代码如下：Public Sub 复制单元格批注() Dim range1 As range Dim range2 As range '清除G列 Columns("G:G").Clear Set range1 = range("A1:B4") '指定要复制的单元格区域 Set range2 = range("G1") '指定要复制的位置（左上角单...
阅读全文
摘要：正在使用的工作簿，嫌窗口太多，不利于操作，想把窗口隐藏，该怎么做呢？Public Sub 隐藏正在使用的工作簿() Application.Visible = False MsgBox "已经隐藏工作簿！" MsgBox "下面即将还原正在使用的工作簿!" Application.Visible = TrueEnd Sub点击运行程序后，出现如下结果接着出现弹窗工作簿还原了...
阅读全文
摘要：打开Excle，点击“文件”------“最近使用的文件”，如下图：根据上图可以看到，最近使用的文件数目为11个，那么是怎么实现的呢？具体代码如下：Public Sub 最近使用的文件清单数() '最近使用的文件清单数 Application.RecentFiles.Maximum = 11 MsgBox "最近使用的文件清单数设置为：11"End Sub
阅读全文
摘要：打开的Excle如何使用VBA查看当前窗口的宽与高呢？代码如下：Sub 查看宽度与高度() Dim myWidth As Double Dim myHeigth As Double myWidth = Application.Width myHeigth = Application.Height MsgBox "当前窗口的宽与高 " _ & vbCrLf & "...
阅读全文
摘要：第一步：创建语法CREATE TABLE OLIVER_MAP(ID INT,COM_TYPE VARCHAR(100),COM_NAME VARCHAR(100),SR_UP DECIMAL(18,2),SR_LIM DECIMAL(18,2),RES VARCHAR(100));INSERT INTO OLIVER_MAP(ID,COM_TYPE,COM_NAME,SR_UP,SR_LIM,R...
阅读全文
摘要：如题，报错截图如下：根据以上警告信息我们可以清晰看出，是字段DEFAULT_FLAG出错了！于是我们找到对应的字段，结果一看，导出文件中DS表结构中该字段为DECIMAL(18,2),但是导出文件中为VARCHAR(1),这就尴尬了！于是修改字段类型后，轻松导入！注明：此类错误在DS运行时候，DS运行并不会报错，只会有相应警告，需要查看日志才能找到问题。
阅读全文
摘要：Datastage在win10上安装报错如下：这个错误的意思是：。netFramWork的版本不符合要求，于是，我在网上下载了一个版本一致的下载地址为：http://pan.baidu.com/s/1i5kmEfN下载完成以后，就可以开始安装了，但是在win10上安装DataStage时会出现检查不通过，没关系，使用以下命令即可解决问题：setup.exe –force程序正在开始安装.........
阅读全文
摘要：如何使用VBA获取当前工作表的用户名呢？请看如下代码：Sub 获取当前工作表的用户名() MsgBox "当前工作表的用户名为：" & Application.UserNameEnd Sub点击运行程序后，效果如下：点击下载附件
阅读全文
摘要：在VBA中，如何获取Excle的安装路径呢？请看以下代码：Sub 获取Excle的安装路径() MsgBox "Excle的安装路径为：" & Application.PathEnd Sub点击运行程序后，执行结果如下：点击下载附件
阅读全文
摘要：Excle的窗口分为：最大化，最小化，一般 使用VB代码如何查看窗口的状态呢？代码如下所示： 点击“运行程序”，出现如下： 点击下载附件 说明：
阅读全文
摘要：如何获取Excle库文件地址呢？具体代码如下：Public Sub 获取Excel库文件夹的路径() MsgBox "库文件夹的路径是: " & Application.LibraryPathEnd Sub点击"运行程序"，出现如下结果：附件下载
阅读全文
摘要：使用VBA如何获取模板保存的路径呢？具体代码如下： 点击“运行程序”，效果图如下： 附件下载
阅读全文
摘要：点击上图中的"显示Excle内置对话框"，显示效果如下：源代码：Public Sub 显示Excel内置对话框() UserForm.ShowEnd Sub附件下载
阅读全文
摘要：数据如上图所示，点击RUN后的运行结果如下： 得到该文件夹，文件夹内容如上图。 代码如下： Private Sub Command_OLIVER() Dim arr arr = Range("A1:C" & [a65536].End(3).Row) Dim i As Long, wName As S
阅读全文
摘要：使用Excle自带的工具栏图标填充 填充效果图如下： 代码如下： 注意事项：在本代码中出现的“myButton”指的是Excle中的按钮，修改按钮名称如下图： 附件下载
阅读全文
摘要：在Excle中有两种引用方式，例如：第一行第一列的单元格可以是：A1 也可以是R1C1 切换引用样式的代码如下： 执行效果如下： 附件下载
阅读全文
摘要：打开Excle的时候，有时候不需要显示Miscrosoft Excle，如下图标记，想把标记内的内容替换为：管理系统 操作代码： 操作结果如下： 点击上图修改后出现弹窗： 点击下载附件
阅读全文