Quip adds documents, spreadsheets, and tasklists to your Slack experience
- Elevate ideas to Quip docs
- Share Quip docs in Slack
- Get notified of changes to your docs
- Available on iOS/Android/Desktop/Web
Sub ChangeTabNames(Append As String) Dim xls As Excel.Worksheet Dim sn() As String Dim csn As String Dim l As Integer Append = Trim(Append) sn = Split("JAN,FEB,MAR,APR,MAY,JUN,JUL,AUG,SEP,OCT,NOV,DEC", ",") For Each xls In ActiveWorkbook.Sheets For l = LBound(sn) To UBound(sn) If UCase(xls.Name) = sn(l) Then xls.Name = xls.Name & " " & Append Exit For End If Next l Next xls End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
8 Experts available now in Live!