Advanced Search

Return to Snippet

Revision: 37846
at December 18, 2010 04:31 by dotNetkow
Initial Code 
Sub deleteConnections()

For i = 1 To ActiveWorkbook.Connections.Count
If ActiveWorkbook.Connections.Count = 0 Then Exit Sub
ActiveWorkbook.Connections.Item(i).Delete
i = i - 1
Next i

End Sub
Initial URL 

                                

                                                            

                                    

                                        

                                        Initial Description
                                        

                                    

                                    
Code is VBA...

                                

                                                            

                                    

                                        

                                        Initial Title
                                        

                                    

                                    
Remove all data connections from Excel Workbook

                                

                                                            

                                    

                                        

                                        Initial Tags
                                        

                                    

                                    
excel

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Visual Basic