TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼
【TDD】テスト駆動開発【TestFirst】
今までに見たソースコードで一番感動したのは deux
Pythonのお勉強 Part62
Kotlin 5
オブジェクト指向の活用方法を教えて下さい
ECMAScript デス 4
Google App Engine for java
Perlについての質問箱 64箱目
関数型プログラミング言語Haskell Part33
【入門】Common Lisp その11【質問よろず】
- 187 ：
- >>185
Private Sub hoge()
Dim title As String
Dim pro As String
Dim default As String
Dim rtn As String
On Error GoTo Errhd
ThisWorkbook.Worksheets(1).Copy after:=ThisWorkbook.Worksheets(1)
title = "シート名の入力"
pro = "追加したシート名の名前を入力して下さい"
pro = pro & vbCrLf & "キャンセルすると規定のシート名です"
default = "ここに入力してね"
rtn = InputBox(pro, title, default)
If Len(Trim(rtn)) <> 0 Then
ActiveSheet.Name = rtn 'ActiveSheetは使いたくないなー
End If
Exit Sub
Errhd:
If Err.Number = 1004 Then
MsgBox "シート名が重複してます。規定のシート名にします"
Else
MsgBox "エラー：" & Err.Description & "エラーNo：[" & CStr(Err.Number) & "]"
End If
End Sub
Visual Studio 2017 Part5
人工知能ディープラーニング機械学習のための数学
【Delphi】Embarcaderoオッチャ その33【C++ﾋﾞﾙﾀﾞ】
C#, C♯, C＃相談室 Part93
【JavaScript】ｽｸﾘﾌﾟﾄ ﾊﾞﾄﾙﾛﾜｲﾔﾙ55【php,py,pl,rb】
PureBasic
自動巡回ソフトというものを作ってみたい
SVG波形ライブラリ
SQLなら俺に訊け
プログラミングのお題スレ Part16
--------------------
pixivFANBOXを語ろう Part.4
【速報】矢吹神、少年ジャンプでRを描いてしまう [439663139]
青春高校3年C組 Part.45
一場・岩隈が生きていけるプロ野球どう思う？
<訃報>8 野球殿堂板
国立大学教授「『女より男のほうが優れている』と言いたがる男は、男社会の落ちこぼれが多い」 [997425587]
【髪に】100%ヘナ/HENNA part44【優しい】
防衛省一般職★7
JUN(*_J*)ONOSE "J "LUNA SEA part40
ジャンプ打ち切りサバイバルレース part2733
５号機で一番稼げる機種８５
高知の高校野球105
芥川賞総合スレ＠文学板 ２
【SKE48】谷真理佳応援スレ105【祝！「大人の世界」センター】
ぼけおめトーナメント2015-2017
50代のおっさんが、明治駒沢と意味不明なことを叫んでいます
【卵野郎】ジェジェお料理スレ1【目玉焼き】
【動画】英国でミミズ？ネズミ？のような謎の生物が発見される [449538575]
全てのアニメキャラは消耗品である
メンヘラで生活保護33
TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼