VBA HTML

//******************TableとFilter****************
function control(){

CategoryFilter = new google.visualization.ControlWrapper({
'controlType': 'CategoryFilter',
'containerId': 'filter_div1',
'options': {'filterColumnIndex': 1,
'ui': { 'labelStacking': 'vertical',
　　　　　　'caption': 'Select:',
'label': '',
'allowTyping': false,
'allowMultiple': false}
},
});


// '名前' に対する文字列フィルター
var stringFilter = new google.visualization.ControlWrapper({
'controlType': 'StringFilter',
'containerId':'filter_div2',
'options': {
'filterColumnIndex': 0,
'matchType':'any',

}
});


// (Table)
var table = new google.visualization.ChartWrapper({
'chartType': 'Table',
'containerId': 'id_table',
'options' :{'showRowNumber':false, 'allowHtml': true,'frozenColumns':1}
});


var dashboard = new google.visualization.Dashboard(document.getElementById('control_div'))
dashboard.bind([CategoryFilter,stringFilter],table).draw( datatbl);
};


//********************************************************************************************************************
// テーブルで選択された時に値をdataTableから取得する

google.visualization.events.addListener(table, 'ready', onReady);


function onReady() {
google.visualization.events.addListener(table.getChart(), 'select', usefulHandler);
}

// Called
function usefulHandler() {
var selection = dashboard.getSelection();
var message = '';

for (var i = 0; i < selection.length; i++) {
var item = selection[i];
if (item.row != null) {
var str = datatbl.getFormattedValue(item.row, 3);
message += 'row:' + item.row + ', ' + str + '\n';
}
}
alert('You selected \n' + message);
}