SUB 138
x
Gizport
  • Q&A

  • 取扱説明書・マニュアル (文書検索対応分のみ)

 
"エクセル"2 件の検索結果
全般
 
質問者が納得転記ミスがあるようですが置いといて 多分、実行時に Activesheet <> Sheets("前期") の状態ではないでしょうか? Sheets("前期").Select として Activesheet = Sheets("前期") の状態にすれば通ると思います。 あるいはSelectせずに With Sheets("前期").Range("kotoba_1") Select Case...
4576日前view118
全般
 
質問者が納得名前に"Line"を含むものを削除するのが手っ取り早いかと思います。 Sub 線を消す() Dim mySP As Shape For Each mySP In ActiveSheet.Shapes If InStr(mySP.Name, "Line") > 0 Then mySP.Delete Next End Sub どうでしょう?
5643日前view60
  1. 1

この製品について質問する