@End我有一系列的细胞需要添加多条评论，但如果我的代码在import { BehaviorSubject } from 'rxjs/BehaviorSubject';
export class SharedData {
private SelectedClient = new BehaviorSubject(any);
SelectedClientObs = this.SelectedClient.asObservable();
SelectedClientCall(updatedValue) {
this.SelectedClient.next(updatedValue);
}
}
import { SharedData } from '../../shared/shared.data';
export class ComponentA implements OnInit {
TheSelectedClient : null;
constructor(
private SharedData: SharedData,
) {
this.SharedData.SelectedClientObs.subscribe(res => {
// Here you get the update value
this.TheSelectedClient = res;
});
}
行中不接受，但它接受为Sub codingcheck()
Dim x As Range
For Each x In Worksheets("Verbatims").Range("N2:AB500")
For Each y In Worksheets("Coding sheet").Range("E2:E500")
Z = Worksheets("Coding sheet").Range("B2:B500")
If x = y Then
Range("N2:AB500").Value.AddComment
Range("N2:AB500").Value.Comment.Visible = False
Range("N2:AB500").Value.Comment.Text (Z)
End If
Next j
Next i
Application.EnableEvents = True
End Sub