在PowerBIDeskTop开启的SSAS服务，和Sqlserver所开启的一个本质的区别是，前者其端口号是随机生成的，即上一次打开获得的端口号，下一次关闭后再打开，系统分配给它新的端口号，而后者因为是服务器版的，服务器的SSAS端口号是固定的，且服务器一般都是长期打开的，不存在端口号变化引起数据连接字符串要变更的情况。
此篇对应功能实现出自：第3波-与PowerbiDesktop互通互联（Excel透视表连接PowerbiDesktop数据模型）https://www.jianshu.com/p/e05460ad407d
Excel连接PowerBIDeskTop端口号更改了怎么办？
因为这个问题，必须在Excel上对其端口号进行重新更新操作，才可以保证再次打开PowerBIDeskTop的SSAS服务后，原来存储在Excel上的通过连接字符串引用到的数据结果仍然可以保持和SSAS模型有连接关系 。
所以就出现了更新连接字符串的功能需求，当然尽可能地减少用户的操作，让更友好的界面来引导用户作必要的识别重新匹配。
Excel与PowerBIDeskTop连接，是用工作薄连接来承接的，所以只需遍历工作薄连接，将其展现给用户。
代码语言：javascript复制 private void formPbidUpdateConnect_Load(object sender, EventArgs e)
{
foreach (Excel.WorkbookConnection wkbCnn in Common.ExcelApp.ActiveWorkbook.Connections)
{
if (wkbCnn.Description == "pbidConnection")
{
int rowIndex = this.dataGridView1.Rows.Add();
this.dataGridView1.Rows[rowIndex].Cells[0].Value = wkbCnn.Name;
}
}
this.fileName.Width = this.workbookConnect.Width 50;
this.Width = this.fileName.Width * 2 80;
pbidPortTittleMappings = PbidConnection.GetPbidPortTittleMappings();
this.fileName.Items.AddRange(pbidPortTittleMappings.Select(s => s.FileName "|" s.Port).ToArray());
}
最终Excel工作薄连接，只需要用下正则表达式，将原来的端口号给替换一下即可。
代码语言：javascript复制 private void btnEnter_Click(object sender, EventArgs e)
{
foreach (DataGridViewRow row in this.dataGridView1.Rows)
{
if (row.Cells[1].Value!=null)
{
Excel.WorkbookConnection wkbCnn = Common.ExcelApp.ActiveWorkbook.Connections[row.Cells[0].Value];
int newport = int.Parse(row.Cells[1].Value.ToString().Split(new char[] { '|' })[1]);
string newDbName = pbidPortTittleMappings.Where(s => s.Port == newport)
.Select(t => t.DbName).FirstOrDefault();
string newModelName = pbidPortTittleMappings.Where(s => s.Port == newport)
.Select(t => t.ModelName).FirstOrDefault();
string wkbcnnString = wkbCnn.OLEDBConnection.Connection;
wkbcnnString = Regex.Replace(wkbcnnString, @"(?<=localhost:)d ", newport.ToString());
wkbcnnString = Regex.Replace(wkbcnnString, @"(?<=Initial Catalog=)[^;] ", newDbName);
wkbCnn.OLEDBConnection.Connection = wkbcnnString;
wkbCnn.OLEDBConnection.CommandText = newModelName;
}
}
this.Close();
}
结语
在Excel、PowerBIDeskTop、.Net编程三者知识的融合下，打造出来最精彩的Excel催化剂功能应用，出自国人之手，并且无论在功能实现还是原始代码都无私奉献给PowerBI社区，供应社区繁荣。
若你也受感动，何不尽一己微博之力，加入到分享Excel催化剂的行列当中？
