VBA 特定の文字列の下に空白行を入れる

Sub add() Dim rNum As Long For rNum = Cells(Rows.Count, 5).End(xlUp).Row To 1 Step -1If Cells(rNum, 5).Value = "挨拶状希望" Then Rows(rNum + 1).InsertNext rNum End Sub

VBA 空白行の削除 メモ

Sub Delete_Rows_w_Blank() Dim GYO As Long Dim KuhakuGyo As Range Dim r As Long ' A列をみて表の最終行を取得する ------ ※1 GYO = Cells(Rows.Count, 1).End(xlUp).Row '2行目から最終行までB列のセルをチェックします With ActiveSheet For r = 2 To G…

VBA  置換 最終行までループ メモ

Sub cut() Dim i As Long Dim str As String For i = 2 To Cells(Rows.Count, 5).End(xlUp).Row Cells(i, 5).Value = Replace(Cells(i, 5).Value, "▼挨拶状(仏事用)の種類をお選びください", "▼挨拶状の種類をお選びください") Next i End Sub ------------…

VBA メモ 2018 11 07

Sub add() '18行 空ける Dim i As Long For i = Cells(Rows.Count, 1).End(xlUp).Row To 16 Step -1 Rows(i & ":" & i + 16).Insert Next i End Sub ----------------------------- '項目選択肢コピー ペースト Sub addcopy() Range("D1:E18").SelectSelecti…

VBA 判定 チェック メモ

VBA

Sub checkd() 'セル i が 空だったら セル AEに 1をいれる それ以外は 0Dim i As Integer For i = 2 To Cells(Rows.Count, 2).End(xlUp).Row If Cells(i, 9).Value = "" Then Cells(i, 32).Value = "1" Else Cells(i, 32).Value = "0" End If Next i End Sub

Google Apps Script (GAS)スクリプト

●高速 ループ処理 function initSheet() { var sheet = SpreadsheetApp.getActiveSheet(); var names = ['natu', 'ko', 'toshi', 'sushi','jjd']; var i; var starttime = new Date(); var scores = []; sheet.clear(); // 2825.0 // for(i = 1; i <= 1000; …

VBA ECサイトに使える_001

●CSVなどで、文字列を足すときに便利。 Sub addtext() Dim i As Integer For i = 2 To Cells(Rows.Count, 2).End(xlUp).Row Cells(i, 3).Value = Cells(i, 3).Value & " 安い のし・包装紙無料 出産内祝い 内祝い 引き出物 香典返し 快気祝い 結婚 引出物 ギ…

jQuery 画像が左か右に無限ループする script プラグイン無し

動きはこんな感じです to 看護 jQueryのCDNは、 <script src="http://ajax.googleapis.com/ajax/libs/jquery/1.8.1/jquery.min.js"></script> か <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script> です。 ーーー html部分 <div id="contactWrap"> </div> に cssの 実際の動きはこちらで確認できます。 http://tokotoko66677…

html css グリッドレイアウト テンプレ

<html lang="ja"> <head> <meta charset="utf-8"> <title></title> </head> <style type="text/css">body{font-family:"Yu Gothic Medium", "游ゴシック Medium", YuGothic, "游ゴシック体", "ヒラギノ角ゴ Pro W3", "メイリオ", sans-serif;} #baby-inner {display: grid; grid-template-columns:repeat(4, 3fr);} .baby-catarog…</html>

本を読むという魔物

最近やっと気づいたんですが、本を読むということは作者の思考、体験、経験をトレースできる。 殆どの人が、トレースをして、ハイ終了。 これでは、例えば成功者のサクセスストーリーを読んだとする。 思考・体験をトレースする。 ↓ ・ここで、その本以上の…

Python 実行方法

例えば、 hello_world.py というスクリプトファイルがあるとして、 コマンドで $ python hello_world.py ↑ でOK! ーーー python対話モード コマンドで、 $ python

jQuery お知らせ ウィンドウ

<div class="message"><a href="#" class="btn1">個人の方</a><a href="#" class="btn2">業者の方</a></div> <style> .message {color: #fff;padding: 20px;background: #b2946c;position: relative;z-index: 10;font-weight:bold;font-size:20px;text-align:center;width: 300px;height: auto;left:65%;}.message:before {content:…

BaseAdapter 画像 & リスト表示 01

MA.java package tossy.list_base_01;import android.os.StrictMode;import android.support.v7.app.AppCompatActivity;import android.os.Bundle;import android.widget.BaseAdapter;import android.widget.ListView;import java.util.Locale;public class …

Android ListView Array ArrayAdapter セット 2

xml list.xml

Android ListView Array ArrayAdapter セット ①

package tossy.list_t_01;import android.support.v7.app.AppCompatActivity;import android.os.Bundle;import android.widget.ArrayAdapter;import android.widget.ListView;public class MainActivity extends AppCompatActivity { private static final S…

wp オリジナルウィジェット サイドお知らせ

/* ------------------オリジナル ウィジェット サイドバー お知らせ ------------------ ------------------------ ----------------*/class MyWidgetItem2 extends WP_Widget {function MyWidgetItem2() {parent::WP_Widget(false, $name = 'サイド お知ら…

form メモ

<p class="form_p"><label id="lb_01">お名前 <span class="red">※</span></label><span class="text-box">[text* your-name]</span> </p><p class="form_p"><label id="lb_02">メールアドレス<span class="red">※</span></label><span class="text-box"> [email* your-email]</span></p><p class="form_p"><label id="lb_03">電話番号</label></p>

ウィジェット表示時にフィルタを無効にする p br 消す

function clean_widget_display_callback( $instance, $widget, $args ) { $instance['filter'] = false; return $instance; } add_filter( 'widget_display_callback', 'clean_widget_display_callback', 10, 3);

カスタマイザーメモ 01

functions.php function theme_customizer_extension($wp_customize) { $wp_customize->add_section( 'header_01', array( 'title' => __( 'TOP ヘッダー エリア カスタマイズ', 'celtisone' ), コンテンツエリア 01 セクション 'priority' => 1, ) ); $wp_c…

WP グーグルマップ カスタムフィールド メモ

functions.php /*##################### カスタムフィールドボックス グーグルマップ ######################## *//*##################### カスタムフィールドボックス グーグルマップ ######################## */// 固定カスタムフィールドボックスfuncti…

jQuery メモ カラー

jQuery(function(){ jQuery(window).scroll(function(){ if(jQuery(window).scrollTop() > 900) { jQuery('.top-content').css('background-color', 'rgba(0,0,0,0.6)'); } else { jQuery('.top-content').css('background-color', 'rgba(255,255,255,0)'); }…

functions.php PHP カスタムヴィジェット めも

/* オリジナル ウィジェット */class MyWidgetItem extends WP_Widget { function MyWidgetItem() { parent::WP_Widget(false, $name = '会社情報'); } function widget($args, $instance) { extract( $args ); $title = apply_filters( 'widget_title', $in…

wp カスタムヘッダー funcitons.php

funcitons.php /*--------- カスタムヘッダー 開始 -------------*/ # ヘッダー画像add_theme_support('custom-header', array( 'width' => 1120, 'height' => 380, 'header-text' => false));

Wp カスタム投稿フィールド グーグルマップ自動設置機能 めも

/*-----カスタムフィールド 方法 2 --------*/ /*-----カスタムフィールド 方法 2 --------*/ // 固定カスタムフィールドボックスfunction add_shrine_fields() { //add_meta_box(表示される入力ボックスのHTMLのID, ラベル, 表示する内容を作成する関数名, …

wp コピペ用  sidebar.php

<div class="profile"> </div> 'post', 'post_per_page' => '5')); if($myposts) : ?> <aside class="mymenu"><h2>最新記事一覧</h2><ul> <li></li></ul></aside>

wp header.php コピペ用

<html lang="ja"> <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible" content="IE=edge"> <meta name="viewport" content="width=device-width, initial-scale=1, shrink-to-fit=no" /> <meta name="description" content=""> <meta name="author" content=""> </meta></meta></meta></meta></meta></head></html>

Wordpress カスタム投稿タイプ ② functions.php と テンプレート.phpで設定

// カスタムポストタイプ 02function my_post_type02(){ register_post_type( 'a_shrine', array( 'label' => '神社', 'description' => '神社の情報', 'hierarchical' => false, 'public' => true, 'has_archive' => true, 'supports' => array( 'title', #…

Wordpress カスタム投稿タイプ 出力 ①

single.php ------- ○カスタム投稿タイプ、キー、値出力 <table> $value) : ?> <tr> <th></th> <td></td> </tr></table>

WP js 読みこみ フッターから

function my_load_widget_scripts() { wp_enqueue_script('widgets_js', get_template_directory_uri() . '/js/script.js', array() , Null,true); wp_enqueue_script('hatebu', get_template_directory_uri() . '/js/doubletaptogo.js"', array(),Null,true…

WP functions.php デフォルト jQuery の読みこみをさせない CDN に代える

/* --- デフォルト jQuery の読みこみをさせない CDN に代える --- */ function load_cdn() { if ( !is_admin() ) { wp_deregister_script('jquery'); // 同梱のJQueryを読み込ませない //Google CDNのJQueryの登録 wp_register_script('jquery', 'https://c…