excel

Remove a non-existant Sheet in VBA

家住魔仙堡 提交于 2021-02-05 05:10:19
问题 I have sheets listed in an Excel Workbook that don't actually exist. The sheets are listed when you view code and are looking at the list of sheets in the VBA part, but they don't actually exist in the workbook at all. They also aren't hidden, in case someone is thinking of that. These sheets also don't have a name after them in parentheses and look like the same icon as ThisWorkbook. I have no way to delete them and have been trying. Does anyone have any suggestions on how to delete them

Remove a non-existant Sheet in VBA

☆樱花仙子☆ 提交于 2021-02-05 05:08:27
问题 I have sheets listed in an Excel Workbook that don't actually exist. The sheets are listed when you view code and are looking at the list of sheets in the VBA part, but they don't actually exist in the workbook at all. They also aren't hidden, in case someone is thinking of that. These sheets also don't have a name after them in parentheses and look like the same icon as ThisWorkbook. I have no way to delete them and have been trying. Does anyone have any suggestions on how to delete them

Remove a non-existant Sheet in VBA

霸气de小男生 提交于 2021-02-05 05:08:23
问题 I have sheets listed in an Excel Workbook that don't actually exist. The sheets are listed when you view code and are looking at the list of sheets in the VBA part, but they don't actually exist in the workbook at all. They also aren't hidden, in case someone is thinking of that. These sheets also don't have a name after them in parentheses and look like the same icon as ThisWorkbook. I have no way to delete them and have been trying. Does anyone have any suggestions on how to delete them

Count unique text values based on criteria in other column

蓝咒 提交于 2021-02-04 21:53:04
问题 I have two columns titled "Company" and "Department", example below. The third column is what I would like to create, but I am unsure how. I want the third column to show the number of departments for a given company, and only show that number in the first reference to the company. 回答1: Try this in D2 and fill down. =IF(COUNTIF(A$2:A2, A2)=1, SUMPRODUCT((A$2:A$999=A2)/(COUNTIFS(B$2:B$999, B$2:B$999&"", A$2:A$999, A2)+(A$2:A$999<>A2))), "") 回答2: If you create a helper column in Column C that

Count unique text values based on criteria in other column

泪湿孤枕 提交于 2021-02-04 21:49:20
问题 I have two columns titled "Company" and "Department", example below. The third column is what I would like to create, but I am unsure how. I want the third column to show the number of departments for a given company, and only show that number in the first reference to the company. 回答1: Try this in D2 and fill down. =IF(COUNTIF(A$2:A2, A2)=1, SUMPRODUCT((A$2:A$999=A2)/(COUNTIFS(B$2:B$999, B$2:B$999&"", A$2:A$999, A2)+(A$2:A$999<>A2))), "") 回答2: If you create a helper column in Column C that

AddItem not populating options in combo box

▼魔方 西西 提交于 2021-02-04 21:42:04
问题 I have the following form. I've added each item as per .AddItem "" , however they are not populating in the combobox in the userform. (This is in a separate module referring to the userform) Code With frmForm .txtFirst.Value = "" .txtLast.Value = "" .txtYear.Value = "" .cmbSchool.Clear .cmbSchool.AddItem "Harvard" .cmbSchool.AddItem "Northwestern" .cmbSchool.AddItem "UCBerkley" .cmbSchool.AddItem "Stanford" .cmbSchool.AddItem "NYU" .cmbSchool.AddItem "UoT" .cmbSchool.AddItem "UBC" .cmbSchool

CSS selector QuerySelector alternative

醉酒当歌 提交于 2021-02-04 21:41:04
问题 I have searched a lot and a lot so as to find material about how to get meta data using XMLHTTP. And I think that's impossible to do that using the Early binding method. The only approach that will work is the late binding by CreateObject("HTMLFile") and dealing with that HTML which is late binding. The disadvantage of this approach is that it doesn't support the use of the QuerySelector or QuerySelectorAll .. Now I am trying to find alternative to this CSS selector .. without using the

How can I run these macros together across every worksheet in the workbook?

做~自己de王妃 提交于 2021-02-04 21:37:23
问题 I have made an excel book, where a data set is pasted into one tab, and macros are run to filter out the information into seperate worksheets, ready to batch PDF. Currently I have a button on each sheet to 'Update Table' and have to go through each sheet to click this button. I want this as one button on the first sheet. I also have a button to set the print area on all sheets - this one loops and works fine. I'd like to merge the codes, so one button will go through each sheet to update the

AddItem not populating options in combo box

孤街浪徒 提交于 2021-02-04 21:37:21
问题 I have the following form. I've added each item as per .AddItem "" , however they are not populating in the combobox in the userform. (This is in a separate module referring to the userform) Code With frmForm .txtFirst.Value = "" .txtLast.Value = "" .txtYear.Value = "" .cmbSchool.Clear .cmbSchool.AddItem "Harvard" .cmbSchool.AddItem "Northwestern" .cmbSchool.AddItem "UCBerkley" .cmbSchool.AddItem "Stanford" .cmbSchool.AddItem "NYU" .cmbSchool.AddItem "UoT" .cmbSchool.AddItem "UBC" .cmbSchool

How to set data (number) format locale for specific cell using Apache POI (SXSSF)?

偶尔善良 提交于 2021-02-04 21:34:24
问题 The problem is very concrete: using Apache POI, I want to create cell (done), assign number format to it (done), and set format's locale ( stuck here ). The code looks like this: SXSSFWorkbook workbook = new SXSSFWorkbook(100); Sheet sheet = workbook.createSheet(); Row row = sheet.createRow(1); Cell cell = row.createCell(0); CellStyle cellStyle = workbook.createCellStyle(); cellStyle.setDataFormat(8); //currency with thousands separator and two decimal places after period cell.setCellValue