excel

问题 I am running a sub where I need to count the number of checked checkboxes in a groupbox and do this for several groupboxes. Edit: I forgot to mention I am using form controls and not ActiveX controls. My first issue is creating an array of group boxes. I tried using GB_Array = Activesheet.Shapes.Range(Array(Cells(x, y), Cells(z, y))) ' x,y,z defined elsewhere I can make that work by manually adding, but it isn't ideal. My second issue is with this part: Option Base 1 Dim cbox as Checkbox Dim

问题 How do i use excel vba to extract merged data selectively(not manually clicking and copying from the excel sheet and also not specifically listing the range of the data that i want to copy. What i want is in a way such that the programme extract the entire row that has the same type of name from column F to column H for example Martin_1,Martin_2 and Martin _3 respectively for different names(John, Charlie) and copy and paste them to a new worksheet. Put the extracted data into 3 different

问题 How do i use excel vba to extract merged data selectively(not manually clicking and copying from the excel sheet and also not specifically listing the range of the data that i want to copy. What i want is in a way such that the programme extract the entire row that has the same type of name from column F to column H for example Martin_1,Martin_2 and Martin _3 respectively for different names(John, Charlie) and copy and paste them to a new worksheet. Put the extracted data into 3 different

问题 How can I get the byte array of the opened Word Document (.docm) without saving it to a local drive first. The document will be opened on a Thin Client without any local drive from SharePoint. When the user want to save the changes, I need to send the byte array to a web-service to process it. (Not back to SharePoint). Dim filePath As String Dim fileName As String Dim fullFileName As String filePath = ThisDocument.path fileName = ThisDocument.Name fullFileName = filePath + "/" + fileName the

问题 I have a pandas data frame that I create as follows: stats_matrix= #A list containing my data myindex=['','event 1','event 2','event 3','event 4','event 5','event 6','event 7','event 8','event 9','event 10'] #List used for indexing rows column_names=['Failed 1st Stage','% Failed 1st Stage','Active 1st Stage','% Active 1st Stage','Failed 2nd Stage','% Failed 2nd Stage','Failed 1st & 2nd','% Failed 1st & 2nd','Active 2nd Stage','% Active 2nd Stage','Total failed','% Total failed ','Total active

问题 I am trying to change the pivot filter using vba based on a cell. I get error Application-defined or Object Error on my second line of code. Sub RefreshPivots() Sheets("Details").PivotTables("PivotTable1").PivotCache.Refresh Sheets("Details").PivotTables("PivotTable2").PivotCache.Refresh temp = Sheets("Input").Range("H2") Sheets("Details").PivotTables("PivotTable1").PivotFields("Period").PivotFilters.Add Type:=xlCaptionEquals, Value1:=temp End Sub I am trying to switch to a date that I have

问题 I feel like the answer is out there, but after lots of searching and experimenting, I am still coming up short. So can see in the first image that column O had a comma separated list of values. I would like my routine to filter the data on column A using the entire list when the user double click on the cell containing the list. My code reads: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("O:O")) Is Nothing Then Sheet1.Cells

问题 I can see that Office 2016 for Mac now supports add-ins. How do I go about developing one? Will it be possible to convert existing VSTO-developed COM add-ins for Windows to the Mac version? 回答1: No, there is no tool for converting VSTO based add-ins (i.e. COM add-ins) to Office Apps. You need to develop Office Apps (Add-ins) from scratch. FYI MS rebranded Office Apps as Office Add-ins at the Build#15 conference. See Get started with apps for Office in MSDN for more information. 回答2: Yes, you

问题 I have a map on a website which changes with time (interactive) and I would like to insert it on the excel sheet. I am using this code but it does not show the HTML: Private Sub Mapit() URL = Sheets("sheet1").Cells(1, 1) //Here there is written the link to the website that want to show on excel Sheets("sheet1").Pictures.Insert(URL).Select End Sub Is that possible? I guess that Sheets("sheet1"). Pictures .Insert(URL).Select is the problem but I am not able to find which is the correct way.

问题 I have a map on a website which changes with time (interactive) and I would like to insert it on the excel sheet. I am using this code but it does not show the HTML: Private Sub Mapit() URL = Sheets("sheet1").Cells(1, 1) //Here there is written the link to the website that want to show on excel Sheets("sheet1").Pictures.Insert(URL).Select End Sub Is that possible? I guess that Sheets("sheet1"). Pictures .Insert(URL).Select is the problem but I am not able to find which is the correct way.