关于工作表的选择中通配符的使用

fqyd824

请教，选定总表中各sheet名“江苏南京市”中所有内容复制，下面代码中通配符怎么表示呢？

    C="南京"
    Sheets("*" & C & "*").Select
    Cells.Select
    Selection.Copy



要复制的Sheets("*" & C & "*")，这个变量C是变化的，但包含南京这两个字，该怎么弄呢？


鲜花答谢，求解

我是来讨说法的

用循环来做

microyip

1. C="南京"
   
2. For Each wSH in Sheets
   
3.     If wSH.name like "*" & C & "*" Then
   
4.         wSH.Select
   
5.         wSH.Cells.Select
   
6.         Selection.Copy
   
7.         ……其他代码……
   
8.     End If
   
9. Next

复制代码

lsc900707

1. For Each sht in Sheets
   
2.     If instr(sht.name ,"南京") Then
   
3.         sht.Select
   
4.         sht.Cells.Select
   
5.         Selection.Copy
   
6.     End If
   
7. Next

复制代码